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LISPing in Numbers 


In the first of two articles, Bill Wong gives a brief overview of the Lisp language 
and reviews three implementations of LISP to run under CP/M: muLisp-80, 
Supersoft’s Lisp, and Stiff Upper Lisp. The second article will contain further 


reviews. 
Bee ak Sees 
CP/M Enhancements 
Jan Ashdown’s XERA (Extended Erase) utility reports filenames as it erases 
“While them and asks for confirmation on each file if wildcards are used in the 
e command line. 
still a Ralph Janelli describes how to provide a multiuser CP/M system with some 
e degree of security by means of passwords and log-on/log-off procedures. 
child , nor Michael Sasso shows how to prevent system crashes caused by booting a disk 
yet a fo ol that has no system on it. 
to fame, I Pewee eae 
& 
LiSPed in Word Processing 
Bob Kowitt reviews “Fancy Font,” a software package that provides many 
numbers ] different fonts for an Epson MX-80 printer and also allows you to create your 
own fonts. 
for the Jan Darwin’s “50-Line Formatter” is 50 lines of C code that provide “bare 
. . . P 
numbers bones” formatting of text with ragged right margin. 
9 Jim Gilbreath describes patches to early versions of Word Master to make 
came. the control codes conform more closely with those of WordStar, and also 
A Pp provides a mechanism for automatic dating of document creation and updates. 
un le op e Peter Radatti shows you how to patch the TP/M operating system to run 
WordStar. 
a eae 
North Star and Other Topics 


Tom Wiens describes enhancements to spreadsheet print programs that avoid 
awkward round-off errors and improve the placement of numbers in columns. 
Doug Anderson and John Nash describe how to find the memory location 
of a variable in North Star Basic when you want to pass the address of data to a 

machine language subroutine, instead of passing a value to be processed. 


Hardware Reviews 


0, 
mn 


I] Maehrane reviews the Cramemra (-1f) camn 


MACROTECH International Corporation 


S-100 World News 


20630 Lassen Street, Chatsworth, California * 213-700-1501 


NOW 1 MEGABYTE MAX FOR ALPHA MICRO 


CHATSWORTH—June 30, 1983—Mike Pelkey, Macro- 
tech International President, announced today that a spe- 
cial version of MAX is now running in Alpha Micro 
Systems. 

This special version is available only through Soft Ma- 
chines of Champaign, IL. (217) 
351-7199. Howard Ogle of Soft 
Machines stated, “The new 
AM-MAX1 runs full speed with 
all three Alpha S100 machines” 
Ogle also said, “The AM-MAX1 
is not only the most economical 
memory for Alpha, but the most 
versatile as well. The system is 
even faster with Soft Machines’ 
‘GO FAST’ disk cache utilities’ HOWARD OGLE 

Bob Rubendunst of Soft Machines reports, “Every 
MAX is shipped with software that greatly simplifies imple- 
mentation on bank switched systems. Also included are de- 
tailed installation instructions and diagnostic programs’ 

Dealer inquiries and orders should be directed to Bob 
at Soft Machines. fal 


VIRTUAL DISK NOW NONVOLATILE 


CHATSWORTH—June 30, 1983—Mike Pel- 
key announced today the release of the latest 
addition to the Macrotech product family. The 
B-Board is a multifunction system support 
board, for use with MAX and 128ST memo- 
ries. Used with the 128ST, this combination 
creates a complete disk emulation, including 
nonvolatility. The B-Board features include 
battery backup, power fail monitor, and charg- 
ing circuitry for on or off board batteries. 

The B-Board functions also include a time- 
of-day clock, using a National Semi device for 
hassle free operation. It also gets early warn- 
ing at power down, so the time-of-day can’t 
suddenly get creative. An interrupt is availa- 
ble which can be used to turn the system on 
or off at a preset time. 

On board ROM space accepts the users’ 


EPROM based program storage. It can be 
configured to accept one or a pair of any 
EPROM type from 2716 to 27256, in 8 or 16 
bit format. It supports a wake up jump option 
with full or shadowed phantom overlay. 

The ERROR TRAP feature is designed to 
support the parity error detection feature of 
the MAXseries dynamic memories. Any acti- 
vity on the system’s ERROR line causes the 
trap to record the extended address and data 
busses and 20 bits of bus status information. 
Up to 16 events can be trapped; the trap issues 
an interrupt when it’s full. 

The B-Board is a logical addition to the 
growing family of Macrotech International’s 
no-compromise S100 boards for no-com- 
promise users. fal 


MACROTECH Moves 


CHATSWORTH~— June 30, 1983—Macro- 
tech has moved to larger facilities located 


at 20630 Lassen St., Chatsworth, CA 91311. 
The new phone number is (213) 700-1501. 


"Due to a healthier marketplace and a 


Virtual Disk for CP/M 86* 


Dan West, Westcom Systems 


BURBANK — June 30, 1983—Most of the 
CP/M 86* application programs available to- 


day fail to take advantage of the possible one 


megabyte address space, Virtual Disk for 


MAX Split Personality 


BURBANK — June 30, 1983—“Many current 

operating systems permit MAX to double as 

both virtual disk and system memory,” stated 

Dan West of Westcom Systems. As an example, 
an MP/M 2.1* system using MAX-M could be 

configured as a 512K system memory and a 

512K Vdisk. A typical CP/M 3.0* configura- 
tion could be 256K of system memory and up 

to 768K Vdisk. CP/M 2.2* of course, only per- 
mits a 64K system memory, leaving the bal- 
ance for a virtual disk. With MAX, or the 

128ST, both functions can run simultaneous- 
ly in a single memory board. hal 


PRICE INDEX 


SIZE P/N PRICE 
Static Memory 128K 128-ST $1232 
Dynamic Memory 256K MAX-256 $1108 
24-bit 384K MAX-384 1292 
Addressing 512K MAX-512 1647 
640K MAX-640 1737 
768K MAX-768 1815 
896K MAX-896 1899 

1M MAXM — 1983 


With 16-bit M3 Addressing option, add $91 


Software (nrovided on 8" digk| 


Incubation Complete 


A Third Generation is Born 


AZ80 based microcomputer board with memory and I/0 functions 


¢ Fully complies with IEEE 696 Standard 
¢ 4/6/8 MHz Z80 A/B/H* 
e Supports CP/M® Plus 


e Operates as bus master/slave for multi-user, multi-processor architecture. 


¢ 2 serial ports, 1 full SAS! port 
¢ Alll/O drivers on board 

* Memory management 

Full 24 bit address capability 
¢ 3-16 bit CTC’s 


(Pictured above) 


¢ 64K on board memory, dual ported, parity checked 


PA 


¢ 256K Capacity with 64K chips 
¢ 1024K capacity with 256K chips 


PTTL LLL 


¢ On board refresh 
¢ 24 bit addressing 


microcomputers. 


¢ 6 Slot motherboard 
¢ Rugged metal enclosure 
¢ Supports up to 5 users 


¢Z80 CPU 
¢ 256K RAM 


ExpandioRAM IV —Random access memory board 
utilizing 64K or 256K NMOS RAM chips 
e Fully complies with IEEE 696 Standard 


¢ Error checking and correction (2 bit detection, 1 bit correction) 
¢ Supports both 8 and 16 bit data transfers 


SD300—A new series of compact yet expandable S-100 


¢ Compact size approximately 4” x 14" x17" 


OEM Version: Designed for ease of Integration and maximum flexibility 


 Versafloppy Il with free CP/M Plus™ 


Disciess Version: An ideal high performance system for disk Intensive 
applications. Eliminates disk walt states for spread sheets, spelling checkers, 
and network operation. Utilizes SpSystems RAMDisc and ROMDisc modules. 


VEW-3: Asingle board controller for floppy and 
Winchester disk drives: 


* Fully complies with IEEE 696 Standard « Free copy of 
CP/M Plus™ included ¢ Up to 4 floppies and three Win- 
chester drives may be controlled by VFW-3 « Data 
transfers to and from board under DMA or programm- 
ed 1/O control « Supports 24 bit address space. 


CP/M Plus™:high performance single user 
operating system. 


¢CP/M® 2.2.compatible—no modification! « When 
used with SDSystems 256K memory board speeds are 
up to 7 times faster than CP/M® 2.2. ¢ High perfor- 
mance file system « MP/M® II file password protec- 
tion « Time and date stamps on files « Support for 1 to 
16 banks Of RAM « Support for 1 to 16 drives of up to 
512 MB each « Easy to use system utilities with HELP 
facility « Powerful batch facility * Sophisticated pro- 
grammer utilities. 


CP/M® 2.2 and CP/M Plus™ are registered trademarkes of Digital Research, Inc. 


= DSYSTE Bed & 40111 Miller Road « Dallas, Texas « (214) 340-0503 « TLX-682 9016 


RAMDisc 256: Asolid state disk emulator that 
greatly increases system performance by eliminating 
disk waits In disk intensive applications. Excellent for 
spreadsheets, spelling checkers and software 
development. 

¢ 256K Capacity * 1 mb total bus capacity » CP/M® 2.2, 
PLUS T™ compatible « I/O port addresses user selec- 
table « Storage locations addressed by on board 20 bit 
counter e On board refresh. 


ROMDisc 128: An EPROM board that replaces a 
floppy disk drive for the purposes of booting CP/M® 
and loading application programs. 


¢ Provides non volatile, permanent storage of pro- 
grams and data « Utilizes 2732 or 2764 EPROMS, (16 
max) ¢ 128K capacity per board « 512K system capacity 
e Use with SDSystems RAMDisc to configure a stand 
alone or network discless system ¢ CP/M Plus™ 
available in eproms « Serial port provided. 


oe ESET 


*780 product of Zilog Corp. vi 


CIRCLE 3 ON READER SERVICE CARD 


ASyntech Company 


get it 
in gear 
with.... 


»” GET YOURS MOVING 


Cache/Q Specifications 


OPERATING SYSTEMS: 
PC-DOS 
(Also Available for CP/M 2.2) 


BUFFERING TECHNIQUE: 

Least Recently Used (LRU) algorithm 
controls disk-buffering; automatic disk/ 
print buffering dynamically adjusted for 
highest efficiency. 


BUFFERING CAPABILITY: 

Utilizing up to 590K of memory. Cache/Q 
will operate with up to 16 attached mass 
storage devices, with sector sizes ranging 
from 128 bytes to 16K bytes and can 
operate up to 5 attached printers. 


INSTALLATION: 

No modification of existing programs, 
operating procedures, or hardware 
required. A simple interactive configura- 
tion program needs no special expertise to 
operate. 


Why wait longer, to buy it... to try it? 
® speeds up your programs, saves time and money 
e faster dBase II, Wordstar and many more 
® makes your computer investment really pay 
e gets your computer in gear ... gets you in gear 
Cache/Q features automatic memory management for your IBM PC providing: 
Disk-buffering that can speed up your application programs up to four 
or more times the speed your are now getting. 
Background print-buffering that will allow you unrestricted use of 


your computer with concurrent operation of up to five attached 
printers, each with an independent data stream. 


Automatic write-thru to your disks protecting your working data from 
power failure. 

Capability for specifying selective buffering of data according to disk- 
drive, file, even extension. 

VERSATILE e FLEXIBLE e EFFICIENT e EFFECTIVE 


To order CALL NOW: (800) 835-9595. In Calif. (800) 835-9594—Dealer Inquiries Welcome 
IN CANADA CONTACT: CYBERTECH TRADING CORP. 


Unit 9, 11720 Voyageur Way © Richmond, B.C. V6X 3E! So 
Telephone (604) 278-4848 e Toll Free 1(800) 663-9767 
Techne’ Software Corp. ¢ 3685 Mt. Diablo Blvd., Suite 210 © Lafayette, CA 94549 CL. ee | 


Cache/Q is a trademark of Techne Software Corp. ¢ Cache/Q is a product of Techne Software Corp. * Copyright® 1982 by Techne Software Corp. 
CP/M is a registered trademark of Digital Research, BM and PC-DOS of IBM Corp., dBase I] of Ashton-Tate, Inc., Wordstar of MicroPro, Inc. 
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GDL’s A-1000*@ 


Why Pay More For Less? 


iii 


Software Saar 


The A-1000 command set not only 
includes pixel and vector draws but also 


Polygon Area Fills, 2D rotation, 
scaling, clipping, dither filis, terminal 
emulate mode, stroke and raster 
character sets, circles, windowing 
and viewporting. A Microsoft com- 
patible subroutine library and C driver 
are included with every A-1000, at no 
extra cost. A PLOT 10 driver and GI0S 


i 


- Supercale Data Graph Octehedron With Hidden 

- Pacific Basin Graphics __ _ Surfaces Removed 

eS ee SBE - Dr. €.L. Morgan, 
On-board 16 Bit Processor : Calif. S.U. Hayward 


High-level Commands © 
$100/696 oF Multibus 


ee is a trademark of Autodes nc. 
GDL offers generous discounts to OEM’s 


- starting in small quantities. So whether you * Formerly called the. Aurora 1000, AU- 


are a small systems integrator or large OEM, RORA is the trademark of Aur 


you will find our pricing attractive. _ Systems. 


GRAPHICS 


DEVELOPMENT “in San Diego Area contact: . 


LABORATORIES Cok Deeds 
Martian Technologies _ 
333 Cobalt Way Suite 106 8348 Center Dr. Suite F 


Sunnyvale, Ca. 94086 La Mesa, Ca, 92041 


driver for GSX are available. | CIRCLE 24 ON READER SERVICE CARD (408) 980-7135 (619) 464-2924 
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Bored Waiting? 


Here's Ihe Board You've 


inte Waiting For. 
(Ah il 


wm 


ais 


es megabits od second. 


A hard disk and cartridge tape constrain the host processor in 


controller together on one changes of the on-board com- any manner. 
board? Magic? Not really. It’s ponents allow the support of ® Two 28-pin sockets allowing 
Teletek’s HD/CTC. The hard disk other drive types/sizes and the use of up to 16K bytes of 
and cartridge tape drive control- transfer rates up to 15 megabits on-board EPROM and up to 8K 
ler provide the support necessary per second. (Interface to disk bytes of on-board RAM. 
to interface both rigid-disk drive is defined by software/ W hichisclinad codhaare reset 
drives and a cartridge tape deck firmware on-board.) capability 
to the S-100 bus. @ Controller communications 
@ A Z-80A CPU (optionally Z-80B) with the host processor via 2K é ee oe 
providing intelligent control of FIFO at any speed desirable ec iI d 
the rigid-disk and cartridge (limited only by RAM access egal cag i te ae ate 
tape drives. time) for a data block transfer. two ih nal ea ing Be 5 oe 
© Support of 51%” rigid-disk Thus the controller does not Sh ee Donon 


is made possible with an 
external card. 


Teletek's HD/CTC Offers A Hard Disk 
Controller, Plus Cartridge Tape Controller, 
All On One Board. 


TELETEK 


9767F Business Park Drive. Sacramento, CA 95827 (916) 361-1777 Telex #4991834 Answer back-Teletek 
© Teletek 1983 CIRCLE 220 ON READER SERVICE CARD 


drives with transfer rates of 
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Running LISP under CP/M opens up the world of artificial intelligence to microcomputer users_ 


Microsystems tests the Cromemco C10 System by Bill Machrone 
A computer specifically designed for a novice user gets a good workout 
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by Jim Gilbreath 

Patch WordMaster to make it more like WordStar; enter document dates and updates automatically 


Finding the Location of a Variable in North Star Basic 
by Doug J. Anderson and John C. Nash 


Pass the address of a Basic variable or array to machine-language subroutines 


Preventing System Crashes During Warm Boot by Michael f Sasso 
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Running WordStar Under TP/ M by Peter V. Radatti 
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Use this minimal text formatter to substitute fora word processor — 
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Write or call for our 
brochure which includes our 
application note: 
“Building Computers — 

A Recipe” 
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Dontieta 


hard disk hold up 
your computer! 


A hard disk can quite literally hold up your computer 
system. Lower cost hard disk subsystems do not have the 
capacity or performance of modern software and operation 
systems especially on multiuser systems where the disk 
subsystem is the most heavily used part of your computer. 

Others will try to tell you that all hard disk drives are the 
same. Don’t believe it. Average access times vary by over 
800% between ProComp disk drives and the slowest drives 
and by 200% between ours and our competition who 
claims to make fast subsystems. 


Don't be held up by an unreliable or 
fragile disk. 

For reliability ProComp’s high speed subsystems use the 
latest technology thin film plated media which eliminates 
the dangers of a fatal head crash through power failure or 
a dead drive through shipping damage or even someone 
dropping the computer. Our drives use direct drive motors 
and thermal compensation so that they give you the same 
data on hot days that they give you on cold ones. We take 
the same care with our cabinets; oversize power supplies 
and fans, and sturdy steel construction create the most 
reliable hard disk you can buy. 


Don't be held up by a disk that is 
too small. 

ProComp subsystems support up to 31MB (unformat- 
ted) per drive. These drives are available NOW, not next 
month or six months from now, with bigger and faster 
drives to follow. 


And most importantly, don’t be held 
up by a disk that is difficult to use. 


ProComp has more experience writing CP/M disk 
software than anyone. Our software can be installed by 
even the most novice user in less than 10 minutes and 
provides all the features that you could ever want. 


So don't get held up by a hard disk, 
call us — FAST. 


systems INC. 
333 West 52nd Street, New York, NY 10019 (212) 246-0074 
Dealer Inquiries Invited 
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icrocomputer software 
IVE: already gone 

through many genera- 
tions, whether we realize it or 
not. In the early days of micro- 
computers (the early ’70s), mi- 
crocomputer software was very 
primitive because micros were 
almost exclusively thought of as 
process controllers, not as gen- 
eral-purpose computers. Thus, 
software was developed on ei- 
ther a mini or large computer, 
using a high-level development 
language (e.g., Intel’s PL/M) 
and a simulator for debugging. 
Then the program was com- 
piled and put on paper tape or 
into a PROM or ePROM. If 
paper tape was used, the micro 
contained a simple paper tape 
interface and a “load and go” 
loader program either on tape 
or in ROM. 

With the advent of the 8008 
microprocessor, Intel intro- 
duced a program called a 
“monitor” or “‘executive,” 
which could be loaded into 
memory via tape or ROM and 
could be used to write and de- 
bug programs on the 
microcomputer using hexadeci- 
mal notation. Often a hexadeci- 
mal keypad was the only means 
for the user to talk to the com- 
puter. Many micro system de- 
signers actually wrote and de- 
bugged their programs using 
this technique. Some small 
high-level interpretive lan- 
guages were actually developed 
this way to run on the 8008. 

The introduction of the new 
8080 chip into the Altair 8800, 
in early 1975, started people 
thinking that micros could be 
used for applications other than 
process control. Thus, in late 
1975 MITS (the producer of 
the Altair) introduced a Basic 
interpreter written by Bill 
Gates and Paul Allen, who lat- 
er decided to market the inter- 
preter on their own and formed 
Microsoft. Also in 1975, Pro- 
cessor Technology Co., a manu- 
facturer of S-100 compatible 
boards, put into the public do- 
main an editor /assembler/de- 
bugger program that took up 
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Editor’s Page 


by Sol Libes 
= 


4K of RAM (or ROM) and 
now allowed users to develop 
programs on their micros. 

However, it was in mid- 
1976, when IMSAI (a MITS 
competitor) introduced floppy 
disk hardware along with a 
disk operating system called 
CP/M, that we entered the 
next generation of micro soft- 
ware. In as little as 16K of 
RAM a user had a very power- 
ful software development sys- 
tem that enabled him to devel- 
op both application and further 
system software right on the 
micro itself. 

Memory sizes increased dra- 
matically to accommodate larg- 
er and more powerful pro- 
grams. Assemblers and debug- 
gers got more powerful and 
convenient to use. More lan- 
guages were written, so that by 
1978 we had a large number of 
utilities and software develop- 
ment tools which made possible 
the introduction of powerful 
applications software. 1978 saw 
the introduction of the first 
word processor, called ‘Electric 
Pencil,” and the following year 
brought us ““WordStar,” the 
all-time word processing best 
seller. This was the third gener- 
ation of micro software. 

This generation was also 
marked by many applications 
packages in the area of data- 
base management, spread- 
sheets, graphics, and communi- 
cations. All these were made 
possible by the availability of 
larger memory size and the in- 
troduction of even more power- 


ful software development tools 
such as relocatable assemblers, 
symbolic debuggers and high- 
level development languages 
such as Pascal, C, and Forth, 
and their associated libraries of 
subroutines. 

Last year marked the begin- 
ning of what I consider to be 
the fourth generation of micro- 
computer software—the gener- 
ation that will finally move the 
computer into the office and 
home on a grand scale. This 
generation is distinguished by 
the introduction of integrated 
software packages that put 
many applications immediately 
at the beck and call of the user 
and allow data and text to be 
easily moved back and forth 
between applications. The best 
example at present is the new 
Tandy 100 portable computer, 
which has an integrated soft- 
ware package in ROM that can 
do word processing, manage a 
small data base, do spreadsheet 
analysis, communicate with 
other computer systems, and al- 
low the user to write and exe- 
cute Basic programs. And data 
and files created can be easily 
moved between applications. 
There is no doubt that this type 
of software is the wave of the 
future for most computers. 

Further, the increase in pow- 
er of microcomputers (more 
memory and 16-bit processing) 
is leading to the use of micros 
in areas that have traditionally 
been those of the mainframes. 
The latest such area to be 
transferred to micros is that of 
Artifical Intelligence (AI). The 
application of AI techniques 
will lead to the creation of “‘ex- 
pert systems” in which we have 
a knowledge base which pro- 
grams can use to solve prob- 
lems for the user rather than 
require that the user define 
how to solve the problems. The 
primary language of the AI 
community is LISP, which is 
now available on both 8-bit and 
16-bit micros. Therefore, in this 
issue we begin a two-part series 
on LISP and the LISP pack- 
ages that run under CP/M. 
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SUPER SIX, THE FIRST 6MHz S-100 SINGLE BOARD COMPUTER 
TO SUPPORT BANKED CP/M™ 3.0 


SUPER SIX FEATURES: 


128 KB of Bank — 
selectable RAM 

6 MHz, Z-80B CPU 
DMA Controller 

6 MHz, Z-80B DART 
(2 Serial RS-232 Ports) 
6 MHz, Z-80B PIO 

(2 Parallel Ports) 

6 MHz, Z-80B CTC 
(Clock Timer) 
Double/Single Density 
Floppy Disk Controller — 
Supports 8” and 5-1/4” 
Drives Simultaneously 
2/4 KB of Monitor 
EPROM 

S-100, IEEE 696 
Compatible 


SUPER SIX & CP/M™ 3.0 
A PERFECT MATCH 


Advanced Digital has found the 
perfect match to its powerful, 
high-speed SUPER SIX single 
board computer. It’s Digital 
Research’s new CP/M 3.0. 
Because of SUPER SIX’s 128 
KB of RAM, it is the only 
S-100 board to support CP/M 
3.0 in the banked mode; or run 
CP/M 2.2 with 64 KB of extra 
buffer. 


SUPER SIX & TurboDOS™ 
ANOTHER PERFECT MATCH 


When you combine the 
TurboDOS multi-user operating 


TurboDOS 


¥ si eit 127 roe 
Maude nc tsitten 


before. Add the 4 MHz or 6 
MHz SUPER SLAVE™ 
processor board(s) and you will 
have the fastest multi-user, 
multi-processor system available 
today. 


See the SUPER SIX at your 
quality computer dealer or 
contact: 


5482 Production Dr., 


system with the 6 MHz SUPER 
SIX, you'll find your system 
running 1-1/2 times faster than 
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Huntington Beach, CA 92649 
Phone: (714) 891-4004 
Telex: 678401 TAB IRIN 


*CP/M is a trademark of Digital Research Corp. 
TurboDOS is a trademark of Software 2000 Inc. 
SUPER SIX and SUPER SLAVE are trademarks of 
Advanced Digital Corp. : 


All you dBASE IT hotshots 


are about to get what you 


deserve. 


You've written all those slick 
dBASE II programs. 

Business and personal 
programs. Scientific and 
educational applications. 
Packages for just about 
every conceivable informa- 
tion handling need. 

And everybody who 
sees them loves them because 
they're so powerful, friendly and easy to use. 

But that’s just not good enough. 


Because now you can get the gold and the 
glory that you really deserve. 


Here’s how. 


We've just released our dBASE II 
RunTime™ application development module. 
And it can turn you into an instant 

software publisher. 

The RunTime module condenses and 
encodes your source files, protecting your 
special insights and techniques, so you can 
sell your code without giving the show away. 

RunTime also protects your margins 
and improves your price position in the 
marketplace. If your client has dBASE II, all 
he needs is your encoded application. If not, 
all you need to install your application is the 
much less expensive RunTime module. 


We'll tell the world. 


With your license for the dBASE II 
RunTime module, we provide labels that 
identify your program as a dBASE II applica- 
tion, and you get the benefit of all the 
dBASE II marketing efforts. 


CIRCLE 13 ON READER SERVICE CARD 


ae: 


We'll also provide additional “how to” 
information to get you off and running as a 
software publisher sooner. 

And we'll make your products part of 
our Marketing Referral Service. Besides put- 
ting you on our referral hotline, we'll publish 
your program descriptions and contact 
information in dBASE II Applied, a directory 
now in computer stores world-wide. 


Go for it. 


But we can’t do any of this until we 
hear from you. 

For details, write RunTime Applications 
Development, Ashton-Iate, 10150 West 
Jefferson Boulevard, Culver City, CA 90230. 

Or better yet, just call (213) dBASE" 
204-5570. And get what you 
deserve today. 


ASHTON -TAIE 


@©Ashton-Tate 1983. 
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|| COMING IN 
|| FUTURE ISSUES 
|| OF MICROSYSTEMS | 


SEPTEMBER - UNIX ON gra? 
ea FIXES YOUR FILES 


MICROCOMPUTERS 


A second look at Unix-like 


Microsystems looks at the 


hardware and software for | \S Detours files around 
|| micros i bad sectors 
_Corrects bad data 
i pallid ao AREA || Retires bad sectors 
I i 
The in’s and out’s of LANs, __ || $1c 0 BETTER THAN 
|| how they are implemented, and |} BACKUPS 
|| a review of CP/NET. | Ss 4 re cm 68 second protect 
j No extra media 
i a ROCOL Ustad Writeup (30 pg.) Much more reliable 
| ah | EASY TO USE 
j 
} 


new super 16-bit processor 48K CP/M 2.2 with two drives, distributed in Self-installing 

|| chips and some of the comput- || 8” SSSD. All orders prepaid. NJ residents Automatic 

| ers that use them. add 6%. Outside U.S. add 20% (U.S. dollars.) User-friendly 
| 


| DECEMBER - CP/M COLO ONLINE 
i SOFTWARE DIRECTORY 40 Balfour Lane, Ramsey, NJ 07446 


|| * The most complete directory | 3 1-327-5155 
of CP/M-based software ever i BON225,/ 0103 ae 


| published in a magazine. 
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S-100 
Same, pnaucrs 


DESIGN « LAYOUT 
MANUFACTURING 


TT-10 
64K STATIC RAM 
FULLY STATIC MEMORY TABLE TOP 


BUILDING BLOCKS MAINFRAMES 
FOR 
SPECIALIZING IN MICROCOMPUTER SYSTEMS, d 
QUALITY DEDICATED CONTROLLERS mpl 
MICRO COMPUTER AND TEST EQUIPMENT PRODUCTS 


HARDWARE CARD CAGES, POWER SUPPLIES MULTIBUS IS A TRADEMARK OF INTEL CORP. 
MAINFRAMES, CPU’S, MEMORY 
1/0, OEM VARIATIONS 


ELECTRONIC CONTROL TECHNOLOGY, INC. 


763 Ramsey Ave.Dept. MS Hillside, NJ 07205 (201) 686-8080 Ext. 100 
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News & Views 


by Sol Libes 


Random rumors 

It is rumored that Microsoft 
began beta testing version 3 of 
MS-DOS in June, with release 
expected in September or Octo- 
ber. It is expected to fix some 
of the bugs (features?) in ver- 
sion 2 and implement a multi- 
programming (a la Concurrent 
CP/M) multiuser system (a 
sort of stripped-down Xe- 
nix). . . . Digital Research, 
ever ready to do battle, is ex- 
pected to shortly announce an 
upgraded version of CP/M-86 
that includes many of the fea- 
tures recently incorporated in 
CP/M Plus. . . . Digital Re- 
search is also rumored to be 
doing the operating system for 
the under $3,000 Lisa-like ma- 
chine in development at Com- 
modore Business Machines. 
The machine is expected to be 
offically announced at Comdex 
this fall. 


Public domain software 


news 
The SIG/M subgroup of the 
Amateur Computer Group of 
New Jersey has released six 
new volumes of public domain 
software. This brings their total 
up to 118 volumes. SIG/M has 
also released a new edition of 
their printed catalog, which 
lists all their software up 
through volume 118. The cost 
is $2 domestic ($2.50 foreign). 
Write to SIG/M, Box 97, Ise- 
lin NJ 08830. 

The contents of the new vol- 
umes are the following: 


Volume Contents 

113 Kermit—Communica- 
tions package 

114 ~~‘ Pistol—Language in the 
footsteps of Forth and 
Stoic 

115 Miscellaneous utility 
programs 
Forth, ZCPR2 up- 
grades, and miscella- 
neous utilities 
Macro library, catalog 
program update, and 
Modem-7 overlays 
XLisp—A complete 
Lisp with message-pass- 
ing features 
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The CPMUG group did not re- 
lease any new software. Howev- 
er, they have raised the price 
for their software. Charges are 
now $13 per 8” disk volume 
domestic ($18 foreign), and 
$17 per 5.25’’ North Star and 
Apple disk volume domestic 
($21 foreign). CPMUG, 1651 
Third Avenue, NY NY 10028; 
(212) 860-0300. 

In order to speed up the 
availability of public domain 
software and reduce the cost of 
CPMUG volumes, a commer- 
cial service is offering SIG/M 
and CPMUG software. Cata- 
logs of SIG/M and CPMUG 
public domain software ($4) 
and IBM-PC public domain 
software ($1) are available. 
Write: Turner Systems, 362 
Lincoln Dr., Kenilworth NJ 
07033; (201) 276-1638. 


UNIX news 

Western Electric has an- 
nounced an agreement with In- 
tel, Motorola, National Semi- 
conductor, and Zilog, whereby 
the latter four companies will 
offer UNIX Version V on their 
systems and Western Electric 
will provide support to the com- 
panies. 

Forty-five new UNIX sys- 
tems were shown at the Na- 
tional Computer Conference 
held in May. Of these 45, 80% 
were based on the Motorola 
68000 microprocessor. 

The number of UNIX sys- 
tems in operation may double 
in one fell swoop with Tandy’s 
decision to supply Microsoft’s 
XENIX to all past, present, 
and future purchasers of the 
Tandy 16 Z80/68000 dual-pro- 
cessor system. It is estimated 
that Tandy has already sold 
15,000 Model 16 systems. The 


question now is, what percent- 
age of the systems are multius- 
er systems that will run XE- 
NIX? Until now Model 16 
owners could only run TRS- 
DOS on the Z80 and had noth- 
ing to run on the 68000. 

Also, Microsoft, unable to 
convince Apple to sell XENIX 
to purchasers of the 68000- 
based Lisa, has decided to sell 
it direct through dealers. Re- 
gretfully, Microsoft will not be 
selling a generic version for 
those who wish to their own 
implementation. Now, if some 
enterprising hacker could come 
up with an implementation 
package. 


Radio Shack news 
Tandy Corp. has introduced the 
new TRS-80 Model 4 with 80 
x 24 display; CP/M Plus is 
available as an option. A two- 
disk version with 64K of RAM 
(expandable to 128K) is $2000. 
This includes RS-232 and par- 
allel printer interfaces, plus a 
new TRS-DOS (Version 6) 
operating system. The new 
DOS includes features such as: 
memorydisk, JCL, type-ahead, 
I/O redirection, print spooler, 
modem support, and forms tai- 
loring. 

Aton International Inc., 260 
Brooklyn Ave., San Jose CA 
95128 is offering a software 
product to allow users of the 
Radio Shack TRS-80 Model II 
12- and 15-multiuser systems 
in multiuser configurations to 
run both CP/M and XENIX 
on the same hard disk. 


DRI news 
Digital Research Inc. has an- 
nounced an agreement with Vi- 
siCorp to adapt Visi°’ software 
for CP/M systems. Visi°’ is an 
interactive, graphics-oriented 
software environment that pro- 
vides an Apple Lisa-like envi- 
ronment (e.g., windows and 
mouse). 

As yet Visi°’ has not been 
delivered to customers and is 
not expected to become avail- 
able until October. It has been 
demonstrated at shows such as 
Comdex and CP/M ’83, run- 


The Image Solution 


The CAT 1600 Series lets you take full advantage 
of your color graphics potential. 


Plug this powerful color video 
graphic system into your IEEE-696 bus 
and watch your computer open its 
eyes. Exercise your creativity develop- 
ing new ways to study your world and 
discovering the flexibility of video 
imaging. Our real time frame grabber 
gives you instant availability of the 
image to be processed. The CAT 1600 
is the creative link between machine, 
man and the world. 


Resolution is the name of the game, 
and we've got it. Physically you're 
looking at 512 x 512 pixels up to 24 
bits deep. And that’s real color. Now, 
center on a pixel, any pixel, and roam 
the screen through an image space 
as large as 1K x 2K. Zoom in and 
explore a close-up of 32:1, not in the 
usual quantum leaps of integer zooms, 
but in smooth logarithmic steps of 


1.1%. A smooth zoom... that’s human 
engineering. 


At the heart of the matter is a dedi- 
cated 8086 image processor. It blazes 
a 16 bit wide path through the various 
memories, lookup tables and image 
parameters as it executes high level 
commands from your host processor. 
Up to 48K of static RAM makes the 
image processor useful for download- 
ing custom programs from the host. 


When it came to adequate memory, 
we didn't forget. 768KB of dynamic 
memory gives you plenty of image. 
Our PROMs have a library of 64K 
organized into over 130 sophisticated 
graphics commands such as continu- 
ous live digitization, character and 
shape generation, global image man- 
ipulation and animation effects, to 
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FULTRATE 
Lieate 


relieve the host computer from low 
level primitives. 

At your disposal is a palette of 16.7 
million colors and 256 shades of gray. 
Quantized lines or free-hand sketch- 
ing completes the picture. Use a 
variety of pen widths, brush strokes, 
even airbrush! Now imagine what you 
can do with a superb quality image 
captured in real time from a color video 
camera. Contact us for an eye opening 
demonstration: 935 Industrial Avenue, 
Palo Alto, CA 94303. 415/856-2500. 


i DIGITAL 
| =GRAPHIC 
|==SYSTEMS, INC. 


What You See Is What You Get. 


ning on the IBM-PC. 

DRI is expending much ef- 
fort on making application pro- 
grams portable between ma- 
chines. this involves unifying 
the various runtime packages 
for each high-level language. 

DRI has also announced a 
new Basic interpreter for 16-bit 
systems, called ‘Personal Ba- 
sic”, which is compatible with 
Microsoft MBasic. The lan- 
guage offers enhancements, 
such as syntax checking during 


CompuFone 


IEEE-696 / S-100 BUS 


News & Views continued... 


statement entry, and debugging 
aids, such as variable tracing, 
breakpoints, and single-step op- 
eration. 

DRI has also disclosed that 
it will soon put an on-line data 
base on the Source (McLean 
VA) timesharing system. This 
database will include technical 
support and marketing infor- 
mation. ; 

DRI now also has a coordi- 
nator of CP/M User Groups. 
He is Gary Gysin, Mail Station 


TELEPHONE INTERFACE 

* FCC Approved 

¢ Initiate & Answer Phone Calls 

¢ Trunk Status Detector 

* Touch-Tone® Generator & Decoder 
VOICE DIGITIZER 

¢ Record Speech 

© Speech Storage on RAM or Disk 

¢ Speech Output 

¢ 5 Bit Rates 

COMPUTER INTERACTION BY 
TELEPHONE 

Access and enter data to your computer 
from any telephone via the Touch-Tone® 
keys. Verify your transactions by 
recorded speech. So many exciting 
applications for the CompuFone are 
possible: voice mail, telephone 
answering machine, electronic funds 
transfer, telephone soliciting and data 
gathering, electronic Rolodex? data 
base query with voice output, order 
entry and inventory control, telephone 
banking — and that’s just the beginning. 


COMPUTALKER, 1730 21st St., Santa Monica, CA 90404 


(213) 828-6546 
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8, DRI, Box 579, Pacific Grove 
CA 93950. 


Ada Standard adopted 
ANSI and the Department of 
Defense have both approved 
the standard for the Ada pro- 
gramming language. Also, the 
DOD has announced that it has 
released the Ada validation test 
procedures. DOD trademarked 
the name Ada, and it will not 
permit any language vendor to 
use the name until the DOD 
has tested the product and cer- 
tified that it has passed their 
tests for compliance with the 
standard. Both Western Digital 
and Rolm Corp. have an- 
nounced that they are ready to 
submit their compilers for test- 
ing. The test results should be- 
come known next year. 


Hardware disk inter- 


face standard 
Twenty-six companies, includ- 
ing Control Data Corp., Memo- 
rex, NEC, IMI, Micropolis, 
Western Digital, AMD, and 
National Semiconductor have 
endorsed a 5%’ Winchester in- 
terface standard. Noticeable by 
their absence are Seagate 
Technology, Tandon and 

IBM. . . . TI, National Semi- 
conductor, General Instrument, 
and Motorola are sampling sin- 
gle-chip modem ICs for both 
300- and 1,200-baud use. Ex- 
pected the next generation of 
personal computers will have 
modem circuitry and software 
as built-in functions. 


Software checkout 


service 

Tymshare has disclosed that it 
plans to offer a service whereby 
software packages can be 
checked out via their timeshar- 
ing network, and then users can 
down-load a package if they 
decide to purchase it. 


New book publishers 
Microsoft and VisiCorp, two of 
the leading micro software 
houses, have decided to go into 
the book publishing business. 
Why not—virtually all of the 
book publishers have gone into 
the software business! 


yeDIT 


CUSTOMIZABLE 
FULL SCREEN EDITOR 


Widely acclaimed as an editor, VEDIT has 
evolved to be much more. Only VEDIT offers 
the combination of a versatile full screen 
editor integrated with a powerful command 
language. For the first time you'll be able to 
perform complex, yet useful, text manip- 
ulations that are virtually impossible with 
other editors or word processors. Plus, its 
customizability and hardware support 
ensure that VEDIT will be perfectly matched 
to your individual needs and to any 
microcomputer you are ever likely to own. 


With two modes of operation, VEDIT never 
compromises its speed or ease of use for its 
power and sophistication. As one reviewer 
(Bradford Thompson, BYTE) wrote: ‘If this 
review gives you an appetite for simplicity 
while editing, then VEDIT is well worth 
considering.’ Its command language, based 
on TECO, is virtually a text oriented 
programming language, allowing command 
macros to be created, loaded and saved on 
disk. Yet its simplicity allows even a novice to 
perform tasks beyond the capabilities of any 
word processor. 


The Professional’s Editor for 


Program Development 


Word Processing 


Source Code Translations 


VEDIT cuts programming time in half - with 
multiple file handling, macro capability and 
special features for Pascal, PL/1, ‘C’, Cobol, 
Assembler and other languages. And it can 
help with source code translations (example 
ZILOG to/from INTEL translator macros are 
included). A complete line of translators will 
be available by the year’s end. 


Word processing is a snap with word wrap, 
paragraph and print functions. Command 
macros free you from tedious search/re- 
place operations. Hundreds of search/re- 
place on dozens of files can be performed by 
VEDIT without waiting or intervening. 


VEDIT easily configures to your favorite key- 
board layout. Use any function or cursor 
keys you wish. It optimally supports nearly 
every 8080, Z80 and 8086 computer. 


Go ahead and expect a lot from VEDIT. Its 
performance and our support will satisfy 
your most exacting needs. 


To order, please specify your 8080, Z80 or 
8086 microcomputer, operating system and 
disk format. 


IBM PC, Displaywriter® Zenith Z100 and Z89 ° NEC APC° DEC Rainbow and VT180 ° Televideo 802 
TRS-80 |, ll and 16° Xerox 820° Apple Il Softcard ° SuperBrain ° NorthStar 
MP/M° CP/M-86 ° MP/M-86° Concurrent CP/M-86 ° Cromix° Turbo DOS °MSDOS ° PCDOS 


CP/M and MP/M are registered trademarks of Digital Research Inc. Apple Ill is a 
MS-DOS and Softcard are trademarks of Microsoft. TRS- 
IBM is a trademark of International Business Machines. 


of Apple Computer, Inc. 
of bard Cae 


VEDIT - Disk and Manual 

8080, Z80 or IBMPC....... $150 
CP/M-86 orMSDOS....... $195 
Manualonly...............- $18 


istered trademark 
is a tradernark 


CompuView 


COMPARE VEDIT’S FEATURES 


True Full Screen Editing 
Horizontal scrolling 
Edit files one disk in length 
Automatic Disk Buffering 
Compact (only 16K) and Fast 
Display of line and column # 
Set/Goto text markers 
‘Undo’ key to restore line 
Automatic Indent/Undent 
Adjustable Tab positions 
Repeat function key 
Text Move and Copy 
10 Scratchpad Buffers 
Load/Save buffers on disk 
Powerful command macros 
Directory display 
Edit additional (small) 

files simultaneously 
Insert another disk file 
Unlimited file handling 
® Recovery from ‘Full Disk’ 
® Change disks while editing 
® Word wrap, format paragraph 
@ Simple Printing 
@ 150 page indexed manual 
@ Startup command file 
@ Menu driven installation 
@ Program CRT function keys 
@ Support newest CRT terminals 
@ Support smart CRT functions 
@ Flexible Memory Mapped support 
®@ Customizable keyboard layout 


PRODUCTS, INC. 


1955 Pauline Blvd., Suite 200 ° Ann Arbor, Michigan 48103 ° (313) 996-1299 
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he first topic for this in- 
: stallment of CP/M Bus is 

a discussion of user area 
specifications and the different 
ways in which existing pro- 
grams allow them to be speci- 
fied as part of filenames. Two 
technical points about user ar- 
eas are also mentioned. 

In the remainder of this col- 
umn we discuss a public do- 
main utility system: LU. The 
LU system is a general-purpose 
librarian utility. Possible appli- 
cations for library files are also 
mentioned. 


User area specifica- 
tions 

Starting with CP/M 2.0, Digi- 
tal Research began supporting 
user areas as part of the CP/M 
file structure. The user area 
part of the filename was de- 
signed for compatibility with 
MP/M, in which each user has 
his own file area. With the ad- 
vent of hard disks, the avail- 
ability of user areas has be- 
come important to many 
CP/M users because CP/M 
provides no subdirectory struc- 
ture within its filesystem. How- 
ever, Digital Research’s support 
of this feature for CP/M has 
been very limited. PIP and 
STAT reference user areas in 
limited cases, but CP/M utili- 
ties in general do not recognize 
a filename suffix or prefix to 
override the current user area. 


Two points about user 
areas 

Two points about user areas 
are in order. The first is that 
there are 32 available areas, 
and not 16. Only 16 are acces- 
sible through the console com- 
mand processor USER com- 
mand, but the full 32 may be 
accessed from transient pro- 
grams. These additional upper 
areas are supported by utility 
software such as “The Unica,” 
marketed by Knowlogy. 

The second point about user 
areas concerns closing files. It 
is not possible to close a file if 
it is not in the current (default) 
user area. Be aware of this fact 
and program around it. 
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by Anthony Skjellum 


Specifying user areas 
Many software packages now 
support the specification of user 
areas. Unfortunately, there are 
two standards: a prefix notation 
and a suffix notation. The lat- 
ter notation is used by pro- 
grams such as “The Unica,” 
while the BDS C Compiler’s 
runtime library (and other soft- 
ware) supports the prefix form. 
Here is an example of each: 


ls Cs*.*35 -- Unica style 


pgm 5/C:*.* -- BDS C style 


The prefix form seems to derive 
from the Unix notation for sub- 
directories. 

Since the use of the BDS C 
compiler is more widespread 
than “The Unica,” the prefix 
format may eventually win out 
as the standard notation. How- 
ever, we can expect to use both 
formats in the foreseeable fu- 
ture. We hope that no one will 
invent any additional notations 
for user area specifications. 

The existence of two stan- 
dards is inconvenient, but inevi- 
table considering that Digital 
Research defined no standard. 
The fact that not all software 
permits any form of user area 
specifications is also unfortu- 
nate. 


Library files 

In a CP/M disk directory, each 
filename listed in the directory 
corresponds to one file. Howev- 
er, it is sometimes convenient 
to lump files together as a col- 
lective file. This is most often 
done for archival storage, or 
when sending many files via a 
modem program that will not 
transmit multiple files on a sin- 
gle execution. The individual 
file identities are maintained in 
the collective file, so that mem- 
ber files can be extracted later. 
Use of libraries can also save 
disk space (and directory en- 


tries.) Disk space is saved, 
since CP/M allocates sectors to 
files in 1K increments. 

Virtually none of the pro- 
grams currently available un- 
derstand the LU library 
format, so files will have to be 
extracted from the library be- 
fore they can be used with 
most programs. This limits the 
usefulness of libraries as pseu- 
do-subdirectories. 

Library files can actually be 
counterproductive if used incor- 
rectly. For example, continual 
deletion/updating of library 
member files creates unused 
space in the library, which nat- 
urally consumes disk storage. 
To remove such wasted space, 
the library must be periodically 
repacked. This can be a lengthy 
process for large libraries. Be- 
cause of these drawbacks, I 
recommend that libraries be 
used for archival storage of 
files that are updated only oc- 
casionally. LU’s most impor- 
tant use is in creating conve- 
nient file bundles for modem 
transmission. 


The LU system 

The LU system consists of two 
programs: LU, the librarian, 
and LRUN, a program to exe- 
cute .COM files from a library. 
We'll discuss each of the pro- 
grams in turn. 


The library utility (LU) 
The LU program operates ei- 
ther interactively or on com- 
mand line arguments supplied 
at execution. Commands are 
entered as dash options fol- 
lowed by filename parameters. 
The most convenient way to 
use LU is interactively. In or- 
der to run the program, the fol- 
lowing command is entered at 


the console command processor 
level (CCP): 


A> LU <CR> 


where <CR> indicates, as al- 
ways, either Carriage Return 
or Enter. LU will sign-on: 


Library Utility x.yz 


where x.yz is the version num- 


HOW TO CONTROL YOUR 
CP/M MICRO-AT ONLY $3. 
PER COMMAND. ere 


ARemarkabie Program ForCP/M _page by page, file by file, orline by line with the wonder- | Software Report Card 


Users. instant halt by touching the space bar. ful ways Power 

Of course, CP/M is a wonderful operat- —Need to reorganize files? POWER! Version 2.55 
ing system. That's why so much serious POWER! sorts and formats the directory can put you i 
business software has been created forit. in 4 different ways. And you can easily in complete 

BUT, CP/M is not easy to work with. copy or move files from user area to user control of 
That's why you need to take the POWER! = area. POWERI creates 32 user areas your CP/M 
trip. instead of CP/M's 16. micro. But 

POWER! is a super-power-packed, —Need to change memory? see for your- | Ease of Use 


user-friendly program that lets you take POWER! searches, displays and lets you self. There'sa | krrorHandling O OOP 
immediate and complete control of CP/M. change memory wherever you want. You Money Back 


And at a cost of only $3. per command, it's can even automatically run software any- Guarantee. At © 1982 by Popular Computing, Inc. A 
subsidiary of CW Communications Inc., 


the software buy of the year. where in memory. And you can inter-mix — the low price of Framingham MA. Reprinted from InfoWorld, 
Over 55 Housekeeping Utilities. your search with as many wild card jokers $169., each 

POWER! is over 55 prompted, user- as you need to find, for instance, all occur- — powerful command costs you less than $3. 
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file so that CP/M thinks those parts 
of the disk are already used and 
never attempts to write to 
them. The rest of the 
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ber. The version that I current- 
ly use is 2.12, so this overview 
reflects that version. LU subse- 
quently displays the command- 
line prompt: 


Cd 


A/A:> 


The question mark indicates 
that there is no default com- 
mand at present. The notation 
0/A: indicates that the default 
user area and disk are zero and 
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files.) The ’>’ is the command 
prompt. In response to this 
prompt, we can enter a com- 
mand line or a carriage return 
by itself. The latter causes the 
program to terminate. 
Command lines consist of 
dash options (minus sign fol- 
lowed by a single letter) and 
filenames. For example, to open 
a new or current library file, 
the following command is giv- 


used when 


The language 
that is based 
on the past 
but looks to 


the uses of 
the future. 


FR So 


P.O. BOX 1512 MADISON, WISCONSIN 53701 


A:, respectively (these will be 
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LU reads or writes -O FILENAME 
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LU will open the file FILE- 
NAME.LBR. If the file is new, 
the user will be prompted for 
the number of directory entries 
for the library file. This deter- 
mines the maximum number of 
files that may be stored in the 
library. This number is fixed 
and cannot be increased unless 
the file is reorganized (i.e., re- 
packed). 

Several operations can be 


performed on an open library. 
The first we will consider is file 
addition. To add files, we enter 
the following in response to the 
‘>’ prompt. 


>-A <file l.ext>,f{<file2.ext>1,..., I<fileN.ext>] 


where filel.ext through 
fileN.ext are ambiguous or un- 
ambiguous filenames separated 
by spaces. The BDS C user 
area prefix may be prepended 
to any of the file specifications. 
After entry of the —A com- 
mand, LU will inform the user 
of its progress in appending the 
files to the library. When ap- 
pending is complete, LU dis- 
plays its prompt once again. 
Now —A is the default com- 
mand and further files could be 
specified for appending without 
typing —A again. Here is a 
sample fragment of a session: 


Library Utility 2.12 
=? A/A:>-O LIB 
-- open library LIB.LBR | 
-O &@/A:>-A CPMBUS1.TXT 
-- add file CPMBUS1.TXT 
-A  #/A:>CPMBUS2.TXT CPMBUS3.TXT 
two more files 


== add 


-A B/At> eee 


-- session continues 


Once we have a set of files in 
our library, we could conceiv- 
ably wish to delete one or 
more. This is effected via the 
—D option. Here is an exam- 
ple: 

-? O/A:>-D *,FIL 


-- remove all *.FIL from 


current library 


Like —A, —D accepts multiple 
wildcard parameters that may 

include user area specifications. 
Deleting files leaves allo- 
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cated but unused disk space 
within a library. To remove 
such wasted space, the —R 
command is provided. Using 
—R also allows the library di- 
rectory to be increased. Re- 
packing the library requires 
about as much free disk space 
as the size of the library itself 
because the files are copied 
during the repacking process. 

It is also possible to list the 
contents of the current library 
via the —L command. This 
also displays pertinent informa- 
tion about space allocation, li- 
brary size, file sizes, wasted 
space, and the number of free 
library directory slots. 

When work on a given libra- 
ry is complete, closure of the li- 
brary is accomplished via the 
—C command. This does not 
cause termination of the pro- 
gram, so that new libraries may 
be opened via the —O dash-op- 
tion. Simply typing <CR> in 
response to the command 
prompt closes the current libra- 
ry and terminates execution. 
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Eventually, we will want to 
extract files from a library. 
This is effected via the —E op- 
tion. Like the —D and —A op- 
tions, this command accepts 
multiple filename parameters. 
Here is an example: 


-? B/A:>-E *,* 
-- extract the whole 


One final note. The default 
0/A: may be changed with the 
—U command, which takes the 
new default user area and/or 
disk name as its argument. 


Multiple commands 
When running the program, 
multiple commands may be en- 
tered on the same command 
line. I don’t do this, since I 
prefer to see the action of each 
command in turn. In the nonin- 
teractive mode, multiple com- 
mands are, of necessity, entered 
at execution. Here is an exam- 
ple: 


AD>LU -O LIB. -A 5/8:*.FIL -D *.TXT -L -C 


TOTAL ACCESS SYSTEMS 


FOR THE BEST IN S-100 


This example opens the library 
LIB.LBR, adds all of B:*.FIL 
in user area five, deletes all the 
files *. TXT from the library, 
lists the contents of the library, 
and closes the library before 
terminating execution. The 
trailing —C is not required 
here, since closure of the li- 
brary on return to CP/M is au- 
tomatic; it is shown just as a 
sample of what can be done. 


Other features 

The LU program is written in 
BDS C and uses the directed 
input/output package (DIO). 
Therefore, both input and out- 
put may be redirected in a 
UNIX-like fashion. This per- 
mits interactive commands to 
come from a file, and output 
from the program to be logged 
in a file. 


LRUN 

The LRUN program allows ex- 
ecution of .COM files from a 
single library. When many 
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L a 


small utilities are combined 
into a library, disk space sav- 
ings can be substantial. Using 
LRUN is straightforward. 
Here is an example (the default 
library COMMAND.LBR is 
used when none is specified): 


A>LRUN ERAO B: 
-- run ERAQ with parameter B: 


Conclusions about LU 
The LU utility provides a use- 
ful library filing system for 
CP/M. If used properly, it can 
be very convenient. LU is a 
copyrighted program released 
for noncommercial use by au- 
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Disk Format. Free brochure and nearly free demo disk available. 
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thor Gary P. Novosielski. It is 
available on many RCP/M sys- 
tems nationwide. 


Conclusion 
This installment of CP/M Bus 
has included a discussion of 
user areas under CP/M 2.x, as 
well as an overview of the LU 
librarian system. 
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his month I shall be dis- 
i cussing catalogs, assem- 
blers, disassemblers, cross- 
assemblers, and cross-reference 
utilities that are available in 
the CPMUG and SIG/M li- 
braries. 


Catalogs 

A catalog of the CPMUG vol- 
umes up through 91 (last is- 
sued up to June 1, 1983) is 
available from the CP/M Us- 
ers Group, 1651 Third Avenue, 
New York, NY 10028. The 
most recent catalog of SIG/M 
volumes, which covered up to 
Vol. 107, rapidly went out of 
print; a new catalog is in prep- 
aration and will include the la- 
test volumes up to 114. In addi- 
tion, it will include a list of dis- 
tribution points for SIG/M 
(both clubs and individuals). 
You can order it from SIG/M 
Software, Box 97, Iselin, NJ 
08830 at $2 (mailed, USA) or 
$2.50 (mailed, foreign). Both of 
these are brief catalogs, con- 
taining the program names for 
each disk and a half-line indi- 
cation of their purpose. Com- 
plete documentation for the 
programs is included on the 
disks, but can also be found in 
the seven catalogs of CPMUG 
and SIG/M volumes issued by 
the New York Amateur Com- 
puter Club, P.O. Box 106, 
Church St. Station, New York, 
NY 10008. The price is $10 
(postpaid) for each book ($15 
for overseas airmail). 


Catalog of Public Domain 
Software for CP/M 


Book 1: CPMUG 1 49, 


20 
Book 2: CPMUG 50-54, 

78-79; SIG/M 19-42..214 pp 
Book 3: SIG/M 43-60 ..217 pp 
Book 4: CPMUG 80-84, 

SIG/M 61-76 
Book 5: SIG/M 77-104 
Book 6: ZCPR2 User & 

Refergnce Manuals 

(SIG/M 105) 

Book 7: S106, 107 

ZCPR2 & SYSLIB 

IBM-PC Book 1: 1-26 
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Assemblers 
One of the most useful assem- 
blers in the public domain is 
LINKASM.COM, contained in 
CPMUG Vol. 36. This is an 
enhancement by Ward 
Christensen of the standard 
CP/M ASM.COM, which I no 
longer use. LINKASM runs 
slightly faster than ASM, al- 
lows any number of source code 
files to be assembled into a sin- 
gle .HEX file, and can produce 
a symbol table suitable for use 
with the SID debugger. Each 
source code file to be linked 
ends with the statement LINK 
<filename>, where LINK is 
in the opcode field and <file- 
name> is the name of the 
source file to be linked (.ASM 
is assumed) in the operand 
field. The last file in the series 
must be terminated with the 
usual END statement—no oth- 
er file in the series may contain 
the END statement. The invo- 
cation of LINKASM is similar 
to that of ASM, i.e., LIN- 
KASM file.shp t:, where file is 
the source filename, shp specify 
the drives on which to find the 
source, put the hex file, and 
put the listing, and t: specifies 
the drive on which to put the 
symbol table. The symbol table 
is only partially sorted on the 
first letter of each symbol. An 
external sort program must be 
used if the symbol table must 
be in exact alphabetic order. 
This assembler was originally 
concocted for the specific pur- 
pose of assembling the modules 
of the MODEM program 
which, with comments, 
amounted to over 100K of 
source code. 

Another assembler for 8080 


code is ML-80 in CPMUG 
Vol. 4. This contains (accord- 
ing to the documentation) high- 
level control structures, a recur- 
sive macro-processor, a relocat- 
ing compiler, and a linking 
loader. It is supplied with Sub- 
mit files to run source code 
through the various modules. 
The wide-directory programs 
SDIR and XDIR were written 
by Bruce Ratoff with this as- 
sembler, perhaps also using the 
patched versions of the M81 
and L82 modules on CPMUG 
Vol. 36. Documentation is 
somewhat sparse, but when 
Vol. 4 was released a language 
manual was reputedly available 
from Digital Research for the 
cost of copying; I do not know 
if it is still available. 

Several Z80 assemblers are 
contained in CPMUG Vol. 16. 
The ASMX.COM assembler 
recognizes Zilog mnemonics, 
and is reputed to work well if 
you restrict source, .HEX, and 
.PRN files to the A drive. 
Specifying a different drive, or 
faulty syntax in the command 
line have been known to de- 
stroy the disk directory. 

MACASM is a macro as- 
sembler similar to one issued 
by Intel, and recognizes Zilog 
mnemonics, while running on 
an 8080. The nesting of ma- 
cros, however, sometime clob- 
bers locations 5, 6, and 7, 
which of course is catastrophic. 
The fix is not known. 

Z80ASM is another assem- 
bler that recognizes Zilog mne- 
monics and can be run on an 
8080. This one is reputed to 
work well, but may be hard- 
ware-sensitive. I tried it several 
times, but each time it went 
out to lunch leaving no mes- 
sages. Admittedly, my system 
had a few quirks in it, but I 
had no trouble running other 
programs in the same volume. 


Cross-Assemblers 

One of my former colleagues, 
while vainly struggling to pro- 
duce runnable code for a Quo- 
tron 800 minicomputer from an 
assembler written in IBM For- 
tran, defined cross-assemblers 
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as ““Assemblers that make the 
user cross!’ Oné hopes that this 
definition does not apply to the 
two cross-assemblers I found in 
the public domain catalog. One 
of these is XLATE (SIG/M 
Vol. 91), which translates 8080 
code to Z80 code using Zilog 
mnemonics. The other is A68K 
(SIG/M Vol. 92) which, as one 
might expect, runs on an 8080/ 
Z80 machine but assembles 
source code for the Motorola 
68000 16-bit CPU. 


Disassemblers 

The prime 8080 disassembler is 
RESOURCE (CPMUG Vol. 
42), by Ward Christensen. This 
was based on a stand-alone dis- 
assembler published in DDJ 
and supplemented by features 
to meet Ward’s later needs. 
RESOURCE is so powerful 
that there were nervous out- 
cries from some software ven- 
dors when it was first put in 
the public domain. The docu- 
mentation (as with all of 
Ward’s programs) is excellent. 
With care and experience it is 
possible to disassemble even a 
complex program with RE- 
SOURCE, reassemble the re- 

‘| sult, and find that the new ob- 
| ject code is identical to the ori- 
ginal. 

REZ (SIG/M Vol. 10 & 
CPMUG Vol. 64) is a version 
of RESOURCE modified to 
disassemble Z80 code to assem- 
bly language using either TDL 
or Zilog mnemonics. 

DASM (SIG/M Vol. 91) is 
another Z80 disassembler 
based on RESOURCE, and 
likewise handles both TDL and 
Zilog mnemonics. 

DISAMB (CPMUG Vol. 75) 
is a disassembler written in 
MBasic, to handle 8080, 8085, 
and Z80 code (TDL or Zilog 
mnemonics). Anyone wishing to 
use this program should be sure 
to read DISAMB.DOC first. 
This file contains operating 
procedures and an explanation 
of the numerous small files as- 
| sociated with DISAMB. 


Auxiliaries 

COMBINE (CPMUG Vol. 36) 
concatenates assembly lan- 
guage source modules into a 
single large file, removing all 


comments to save space. symbols. 

NOTATE (CPMUG Vol. XREFPRN (CPMUG Vol. 
78) fetches an assembly lan- 78) scans a .PRN assembly 
guage source file and allows listing and outputs a cross-ref- || 
the insertion of comments. It erence index (by address) to | 
scans each line in the file and, the List device. i 
if no comment is present, Next month I shall be ex- i 
places the cursor at the start of ploring some of the many CP/ |} 
the comment field ready for in- M enhancements that are to be || 
sertion from the keyboard. found in the public domain li- |} 

XREFASM (CPMUG Vol. braries. These will include not |} 
6) prints an assembly language only major systems such as | 
source file with line numbers ZCPR and SUPERSUB, but 
and provides a cross-reference also smaller items such as the | 
index (by line number) of all null file. o i 
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Letters to the Editor 


Dear Sir: 

The public domain program 
CATALOG, by Ward Chris- 
tensen, is one of the most use- 
ful available to the serious hob- 
byist and/or professional. Any- 
one who needs to keep more 
than half a dozen discs on file 
will find this program a must. 
There are various catalog pro- 
grams for sale in the commer- 
cial software market, but none 
that I have tried can compete 
with CAT. 

For those unfamiliar with 
CAT, the package consists of a 
group of related programs: 
CAT.COM, the main retrieval 
program, FMAP.COM, needed 
to sort and catalog files on the 
selected disc, and UCAT.COM 
to update the main catalog file 
(while is labeled MAST.CAT). 
All of these .COM files are the 
end product of years of loving 
extensions and modifications, a 
process that continues today. 
Like all good things, it keeps 
getting better and better. It is 
of course free, being in the 
public domain, but even nicer is 
that there is a CATA- 
LOG.DOC, which tells one all 
that one would ever wish to 
know about CAT but were too 
lazy to ask. Check with your 
local user’s group. 

The main catalog file, 
MAST.CAT, has the very nice 
capability of being told which 
programs to process and which 
to ignore. Thus common files 
such as PIP, STAT, SUBMIT, 
etc. will not clutter up every 
file, and such unneeded (or to- 
tally undesirable) programs as 
* PRN, *.BAK, *.$$$, and so 
forth will not appear. MAST 
CAT is very easy to set up ini- 
tially, but be sure to leave 
enough DUMMY .ARG state- 
ments at the end to allow later 
changes. Otherwise it is very 
difficult to modify! 

The use of CAT is simplicity 
itself. Any disc, once added to 
MAST.CAT, can be updated 
at any time simply by running 
the CAT commands needed for 
processing. Any new files added 
since the prior update will be 
added to MAST.CAT, any de- 


leted from the disc will be au- 
tomatically deleted from 
MAST.CAT. 

To make the update process 
totally painless, or as painless 
as possible at any rate, I have 
written several short and simple 
SUBMIT routines to do the 
drudgery. One of these, called 
CAT.SUB, will update the disc 
in the B: drive with no further 
attention. Another, called 
CATME.SUB, catalogs the 
disc in the A: drive—the mas- 
ter disc itself with the CAT 
programs on it. A third, called 
CAT1.SUB, allows naming and 
initial cataloging of a new disc. 
The programs are listed on sep- 
arate printouts accompanying 
this letter. 

There is a still later version, 
which I have just received, that 
has automatic labeling facili- 
ties: i.e., it will keep track of 
the discs already named and 
will supply the next number in 
sequence for the new disc. I 
have not had a chance to check 
this out yet, and in any event I 
am dubious of its value. The 
ability to supply my own num- 
bers and names, regardless of 
sequence, is better, I should 
think. 

Incidentally, I note from the 
Letters section that a rather 
large percentage of micro users 
like to rename standard pro- 
grams: substituting S for SUB- 
MIT, for instance. I used to do 
this myself, until I found how 
much confusion it causes 
among other users. They al- 
ways want to know “What’s 
this program here—,” which is 
bad enough, but worse when 
I’ve forgotten what the short- 
ened or renamed label means 
myself! Much better to leave 


the standard and accepted 
names as they are. 


CAT.SUB 


:Catalog disk b: 
era *,bak 

era b:*.bak 
fmap b: f 

ucat 


CATME.SUB 


ERA *.BAK 
FMAP A: F 

ERA NAMES.BAK 
UCAT 


CAT1.SUB 


SAVE 0 B:-$1 
ERA MAST.BAK 
ERA B:*,BAK 
FMAP B: F 
UCAT 

ERA NAMES.BAK 


Note: Calling sequence is 
A> SUBMIT CAT: filename:num 


where filename.num is the 
name AND number of the disk 
to be cataloged. Do NOT 
include the hyphen in the 
filename. 


Gerald L. Hewett 
Star Route, Box 108 
Inyokern, CA 933527 


Dear Sir: 

I was very excited by Mr. 
Jon Lindsay’s article entitled 
“Restoring Unsaved MBasic 
Programs” (May 1983, page 
94). 

Immediately after reading 
the article, I rushed to my 
computer, typed in the BASIC 
program (Listing 1.), and, hav- 
ing, lost my share of BASIC 
programs already, I saved the 
program. 

I then typed SYSTEM to re- 


FORTH for Z-80°®, 8086, 68000, and IBM’ PC 


FORTH Application Development Systems include interpreter/compiler with virtual memory management and 
multi-tasking, assembler, full screen editor, decompiler, utilities, and 130+ page manual. Standard random ac- 
cess files used for screen storage, extensions provided for access to all operating system functions. 


Z-80 FORTH for CPR/M® 42:2;OR MPIM ll wes enees och sere atc tiem Se Ree ences ROISE El oe $ 50.00 
8080 FORTH for CPR/Mi2:2:0r, MPIM Wis tek. cesse axe aiesene tars oereisioe & sec ciate Sane apeets ee oarers crane < $ 50.00 
8086 FORTH for CP/M-86 or MS-DOS......... 0... cece eee e eect cece eee eeennunenteneeeees $100.00 
PCIFORTH™ for PC-DOS, CP/M-86, or CCPM..... 0... ccc cece ccc eeeeeeuueeeeeuneeeeunes $100.00 
68000 FORTH for GPRIM-GSK i. ccc scocs « cusge-disysns scus's suit sreepusr duane Gatco us Gace lordiasre Saas Glese Sina $250.00 


FORTH + Systems are 32 bit implementations that allow creation of programs as large as 1 megabyte. This is 
the only language that supports the entire memory space of the 8086/88 directly for programs and data! 


PC/EORTH +~for PC-DOS.-or CRIM-86 sec ssc eer san = eee Fee § ae aoe oat: See ee ae eee $250.00 
SOBEIEORTH = fon SPIMiSB x <canieisrcts souew cevastin anton femeasrst erase scene naane Manette mans Guonnie, onsuls Srsitisrenns @ $250.00 
Extension Packages for FORTH systems 
Software floating point: (Z-80, 8086, PCONlY).. . isc ccd ese ase 8 Hee © thane sete wees sla e wale ols alare $100.00 
intel:8087 support (8086;;PC OnIY) sc: siczic sees wcices cis « Se Gai es eee stew Sew See See Eee eee ¥ $100.00 
AMD 'S5iit¢support (8086);Z-BOKOMLY)\.dicusnes sees cavers eusters enare, swsteekeraiavi wl epeterexene sa) Sure: ataeane sues aeehersy ates $100.00 
Colom GraphiCs: (PCOMIY) irs oxen. cusicne. excess suces acousasscteds avauele: scostsns seas oeenenet ets tolich gates cneusuelesexs si cuareseuehe« $100.00 
symbolic:interactive debugger (PC only): inc < sce o26 2 tes tee oe hae Seles 1 tee oe es c $100.00 
Cross referenceutilit\<s. sac Sen's een. ces as sia ee Stes Fons cams Sa seo See ee ee es $ 25.00 
PCIGEN™ (eustenvaharactarsats, PG Only) < ssa wc seas oan 5 Soe BER 5 Vr ees een Bees Geng $ 50.00 
Hierarchical file: managehins ses san ces cae soe crmatqas ae wns Sree aes eis Pees cS ees eee = $ 50.00 
B=treGii COX MANAG OH ss siayacs anya ce: Biers Recta co crete. acowevts prche ayiette, cust is yaretnt aneosta orem WtepteMs, seus) iaicds- eueme tel eens $125.00 
B-treeiindexand file: Manage tie. cares. ccaye skences «yeunies roye. sxenaue ayepsinieveye aeons abuts siehele winYe larous: eirayermlereyane $200.00 


QTF+ Screen editor and text formatter by Leo Brodie, 
for IBMIPC-WithIBM Of EDSONMOFIMElioccoens:.cocraueic, chousxacondue’ ofene -onouskesanetie io ateae: sacbensy openers enews eeetens cuore $ 50.00 


Nautilus Cross Compiler allows you to expand or modify the FORTH nucleus, recompile on a host computer for 
a different target computer, generate headerless code, and generate ROMable code with initialized variables. 
Supports forward referencing to any word or label. Produces load map, list of unresolved symbols, and ex- 
ecutable image in RAM or disk file. No license fee for applications created with the Cross-Compiler. Prere- 
quisite: one of the application development systems above for your host computer. 


Hosts: 2-80 (CP/M 2.2 or MP/M II), 8086/88 (CP/M-86 or MS-DOS), IBM PC (PC-DOS or CP/M-86), 68000 (CP/M-68K) 
Targets: 8080, Z-80, 8086/88, 6502, LSI-11, 68000, 1802, 2-8 


Cross-Compiler for one host and onetarget........... cece ete eee e eee e eee $300.00 

EaCh AdGitlOnal CAL Sts c.--srancse: opens cee snosns! sexe ieee Geers 41 ensue: synaerto Sune iow gous Seawe-eeremieras sete = $100.00 
AUGUSTA™ ADA subset compiler from Computer Linguistics, for Z-80 computers under CP/M 2.2...... $ 90.00 
LEARNING FORTH computer-assisted tutorial by Laxen and Harris for CP/M, includes Brodie’s 
“Starting’ FORTH” so. ara wes = Sas Sota fee tere wae 5 ose ee Ne be eG wee cee ee ee ee CeO oz $ 95.00 
Z-80 Machine Tests Memory, disk, printer, and console tests with all source code in standard Zilog 
MINOMONICSE cere ate en deer ey cee ee eee ene tia. nh a0 ote hh SE ane ra uot egec ho erakitereneuerener ati enaxe tice mensncesrrne fe $50.00 
DATA ACE, fully relational data base system from CSD, for the IBM Personal Computer. Faster and more 
powerful than) dBASE Wlne< sec sawe tas sce Ser acs Fae was Fas Dase Steaes Sree See awe HR Gee tres a $595.00 


FORTH application development systems require 48 kbytes RAM and 1 disk drive, Cross-Compilers require 64 kbytes. All software distributed on eight inch, single den- 
sity, soft sectored diskettes except PC/FORTH on 5% inch single sided double density diskettes. Prices include shipping by UPS or first class mail within USA and 
Canada. California residents add appropriate sales tax. Purchase orders accepted at our discretion. 


Laboratory Microsystems, Inc. 
4147 Beethoven Street 
Los Angeles, CA 90066 
(213) 306-7412 


Z-80 is a registered trademark of Zilog, Inc. Augusta is a trademark of Computer Linguistics 
CPIM is a registered trademark of Digital Research, Inc. dBASE II is a trademark of Ashton-Tate 
IBM is a registered trademark of International Business Machines Corp. PC/FORTH and PC/GEN are trademarks of Laboratory Microsystems Inc. 
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@ a 
hig Letters continued 
turn to the CCP. Then, follow- actly as stated in the article. 
a ing his instructions, I typed Then, again following the in- 
@ DDT to enter the debugger. So structions, I typed D4990 to 


far, everything was going ex- display a block of memory at 


Table of address equates 


MBasic MBasic 
Version 4.51 Version 5.2 Identity of the data residing 
Location Location at the address listed 
4990H 61BOH Starting address of the block of 
memory you want DDT to display 
si Se Bae 4997H 61BBH 00—Start of Basic source 
MxX-80 COMPATIBLE 4998H 61BCH Low byte value pointing to address 
PRINT BUFFER of the beginning of the next line of 
O«: oer of = source code 
jare board, software in 
$4950 and complete documentation 4999H 61BDH High byte value pointing to address 
eee of the beginning of the next line of 
for fad to i or a poate ial hci source code 
© Automatic adjustment for RAM size © Requires only 7 non RAM ICs 3 
© Diagnastics and status indicators supported. (G085, B185, 74LS373, 7418138 499AH 61BEH Low byte value of the line number of 
° = (Centronics and Epson 2 i ae the first line of the MBasic source 
SIADCoRVI 499BH 61BFH High byte value of the line number 
sme P10, BOX 345 MILFORD, Mlk ans of the first line of the MBasic source 
ical oe 499CH 61COH Location of token for first line re- 


Ohio Residents Add 5.5%- Add $3.00 For C.0.D. Orders 


served key word 
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-INTE RSTE LLAR-DRIVE: - 


= A SOLID STATE DISK EMULATOR 


PION’S INTERSTELLAR DRIVE is designed for use with a 
family of interfaces and software packages. Currently avail- 
able are interfaces for IBM, S100, TRS80, Apple, SS50, and 
most Z80 uP, and software for most popular operating systems. 

e Additional interfaces are continually being developed for the 
most popular computers. 


> —— Basic Price for 256KB unit [includes interface and software] 


is aaa sd —- hee $ 1 095. plus tax (where applicable) and shipping oz = 
OMPULer Ss PrOGUcivity Visa and Master Card accepted. | ie ee 


The INTERSTELLAR DRIVE is a high performance epithelial 

data storage subsystem with independent power a & Tel.(617}923- 
supply, battery backup, and error detection. It has 101R Walnut St..' itertov 

256KB to 1 Megabyte of solid state memory integrated TRS80 trademark of Tandy Corp. Apple trademark of Apple Computers 
to perform with your operating system. Interstellar Drive trademark of PION, Inc. 
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MINI-SYSTEMS 
0) Full IEEE 696/S100 compatibility : eres 
HARDWARE OPTIONS BRE SOFTWARE AVAILABLE 
(1) 8MHz, 10MHz or 12MHz 68000 FOR: 
CPU 2 
(] Memory Management 
(] Multiple Port Intelligent I/O 


CP/M-68K? O/S: 68K FORTH", 68K-BASIC' 


[] 64K or 128K STATIC RAM (70 
nsec) 

() 256K/512K or 1MB Dynamic 
RAM, with full parity (150 nsec) 
LC) 5%"-8" DID, D/S floppy disk 


VED68K' Screen Editor, 
Z80 Emulator!, FORTRAN 77 


Motorola KDM Board: 68KFORTH! 


Motorola MVME 110: 68KFORTH' 


drives 
5MB-40MB hard disk drives 
] Full DMA Disk Interface 


5) SMD Interface | NEW PRODUCTS 


(] %" tape streamer | Ji 


LJ 10 to 20 slot backplane 
20 or 30A amp power supply DEVELOPM EN 
er a Geant aa 68000/16032 Processors 
SOFTWARE OPTIONS For The 
_] 68KFORTH!' systems language 
with MACRO assembler and VME Bus 


META compiler, Multi-user, 
Multi-Tasking 


10MHz ERG/VME 16032 
/w 16082 MMU $1995 
/w 16081 FPU $2495 


0) Fast Floating Point package 
L] Motorola’s MACSBUG 
(1) Unix?Type Operating System 
with C,PASCAL, FORTRAN 77, 
68K-BASIC’, CIS COBOL‘, RDBMS Ure ula sis hie GLAU 
(1 CP/M-68K? O/S with C, Assem- a oena see oe ee 
bler, 68K-BASIC', 68KFORTH', Ww ; 
Z80 EMULATOR’, FORTRAN 77 ERGFORTH' (68KFORTH"') Kernal and Compiler in resident 
Unix? System Ill with C, etc. ROM. Complete ERGFORTH!' Systems Language available for 
| VED68K' Screen Editor both processors. Call for additional software availability. 
Trademark 'ERG, Inc. 
2BELL LABS 3Digital Research 
4Micro Focus 
30 day delivery 
with valid Purchase Order Trademark ‘ERG, Inc.  3Digital Research 
OEM prices available eo 
For CPU, Integrated Card Sets ne. C 
or Systems. Lie 


rN 
Empirical Research Group, Inc. 
DFG, | P.O. Box 1176 
aS Milton, WA 98354 
Empirical Research Group, Inc. 206-631-4855 
P.O. Box 1176 as ; 
Milton, WA 98354 
206-631-4855 


AVAILABLE: 68000 —Now 
16032 — August 


a 


End the Dark Ages of 
Assembly Language.... 


with SMAL/80 


HL=M (PTR) ; 
DE=9; 
HL=HL+DE; 
IF A-L EQUAL 


THEN 


A=A-14 
ELSE 
A=L; 
: M(BC) =A; 


LHLD PTR 


LXI 
DAD 
CMP 
JNZ 
SUI 
JMP 
L1:MOV 


L2:STAX B 


D,9 
D 

L 
Ll 
14 
L2 
A,L 


1030 Park Ave., Hoboken, N. J. 07030 
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SMAL/80 gives you the logical power, 
versatility and convenience of a com- 
piled, structured high level language 
like Pascal, Ada or C, plus the effi- 
ciency of assembly language. 

C intuitive, processor-independent sym- 
bolic notation system to make your pro- 
grams easy to read, debug and maintain; 
0) programming constructs BEGIN... 
END, IF...THEN...ELSE, and LOOP... 
REPEAT, plus indentation, to graphical- 
ly display the structure of your algorithms; 
C) extremely flexible macro and text 
pre-processor to create your own pro- 
gramming environment; 

compiler/linker to mix your input 
source code and relocatable object code, 
creating modular programs; 

C) translator program to automatically 
upgrade your assembly code to SMAL/80; 
CL) available on CP/M disks with manual 
Sor $150 plus $4 shipping. 


New! Z-80 version (runs on 8080s): 
$175. 8080 version only: $150. Macro- 
processor only: $75. Available on 
CP/M disks. Add $4 for shipping. 
Complete tutorial text: ‘Structured 
Microprocessor Programming’’ 
(Publ; Yourdon Press) $20 plus $2 
shipping. Send for your free button 
and literature or try the Ultimate 
Demo: SMAL/80 is Guaranteed! 


Chromod Associates, 


Telephone: (201) 653-7615 


Also available from 
WESTICO (203) 853-6880 
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coe 4990H. That was 
where the problem began. As 
you can see from Listing 2, 
there was no correlation at all 
with my Basic program. Since 
Mr. Lindsay’s instructions were 
so precise, I knew that some- 
thing was wrong. 

That was when I realized 
that I was using the new ver- 
sion 5.2 of MBasic. When 
I looked at the status of 
MBASIC.COM, I found that 
instead of 18K, the program 
had grown to 24K. So, with 
pencil in hand and some hints 
from Mr. Lindsay’s article, I 
went hunting for the elusive 
Basic source program. 

After a few minutes, there it 
was. Instead of lurking in the 
area of 4990H, it was now re- 
siding around 61BOH (Listing 
3.) With that bit of informa- 
tion, it was easy to construct 
the attached table of address 
equates so that Mr. Lindsay’s 


79 PRINT O+h, As 


LISTING 1. 


LISTING 3. 


| 


instructions may be followed 
with the new version of 
MBasic. : 

By substituting the addresses 
given in the table for the ad- 
dresses in Mr. Lindsay’s article, 
you should have no trouble re- 
storing your MBasic programs 
as he explained. 

In the program shown in 
Listing 1, all you have to do is 
go back into MBasic and issue 
the commands: 


POKE &H61BC, &HDO 
POKE &H61BD, &H61 


This will reset the pointers. 
You should then be able to list 
the program and save it using 
the ASCII option. 


John L. Dilbeck 
Microcomputer Systems 
Specialist 

The Lamson Colleges, Inc. 
2300 East Broadway 
Tempe, AZ 85282 


:O7 ah 


ZGENESISE. 


4 COMPUTER CORPORATION 


introduces... 
the Price & Performance Leader 


the GENESIS 8D S-100 micro 


A COMPLETE DUAL 8” DISK DRIVE S-100 MICROCOMPUTER 


FOR ONY---$939500 


THE IDEAL MICROCOMPUTER FOR: 


Business 
Education 
industry 
Development 
Networking 


FEATURES: 


* Z80ACPU 4MHz 

* 64K Dynamic RAM 

* 21.024 MB 8’ disk drives (DSDD) 

* Floppy Disk Controller * 2 Serial Ports 

* CPM 2 2° Operating System * 2 Parallel Ports 
*x DMA 

* * 


(MPM: and TURBODOS:® Available) 
Keylock ON/OFF Switch 


10 Slot IEEE 696 Mainframe 


COMPLETE THE SYSTEM WITH OUR 
INEXPENSIVE TERMINAL AND PRINTER 


COMBINATION FOR ale 4AGENESISS. a 
925 1444 LINDEN ST 
P.O. BOX 1143 


BETHLEHEM. PA 18018 
S>, (215) 861-0850 


ADDS SCHOOLS AND BUSINESSES 
VIEWPOINT C. ITOH PROWRITER ASK ABOUT OUR LEASE 
PURCHASE ARRANGEMENTS 


© Registered Trademark Digital Research 


* Registered Trademark Software 2000 
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A MICROSYSTEMS TUTORIAL 


LISP for CP/M 


The favorite language of the Artificial Intelligence 
community is now available to run under CP/M 


by William G. Wong 


ISP (LIST Processing) is the major devel- 
opment language for the computer science 
Artificial Intelligence (AI) community. It 
was first developed in the early 1960s by 
John McCarthy at the Massachusetts Insti- 
tute of Technology (MIT). Lisp has been available 
on large mainframe computers, but it is now avail- 
able under CP/M and CP/M-86 from a number of 
sources. This opens the world of Lisp and AI to 
everyone who has access to a microcomputer. 

_ This review covers three implementations of Lisp 
for CP/M. The first is muLisp-80, created by the 
Soft Warehouse; it is distributed by the Microsoft 
Corporation and is available from LifeBoat Asso- 
ciates. The second is SuperSoft Lisp from SuperSoft, 
and the third is Stiff Upper Lisp by Harry Tennant, 
which is available from Tennant & Tennant Com- 
puting (3537 Ridgemoor Drive, Garland, TX 
75042). The muLisp package is available for 16-bit 
machines; however, only the 8-bit CP/M versions 
were evaluated for this article. 


Overview of Lisp 

Lisp syntax and semantics are very simple; however, 
Lisp is not as well known as Fortran or Basic. For this 
reason, a quick discussion on Lisp is in order, since 
the examples in this review are given in Lisp. This 
discussion should not be taken as a full tutorial on 
Lisp. Reading one of the books in the bibliography 
should be a prerequisite for purchasing any version of 
Lisp, since the documentation provided with all of the 
packages reviewed here will be incomprehensible 
without one. 

Lisp has two basic components: atoms and lists (of 
course). An atom is a number or name (sometimes 
called a symbol). More extensive implementations of 
Lisp have other types of atoms such as arrays and 
strings. A list is a vector whose elements are either 
atoms or lists. A list is printed within a set of paren- 
theses, with the elements separated by spaces. The 
following are examples of three element lists: 

Atl) 2 3) 

(ELEPHANTS ARE PINK) 

CI (C23), 4) 

(Ee Ce AB IG) (+ 3 2 B)) 

(ONE ((((TWO)))) THREE) 
Notice that the last three examples have lists nested 
as elements. Lisp does not place a limit to either the 
length of a list or the depth of nested lists. 

The number of parentheses in a deeply nested list 
is one reason why Lisp is often called the language of 


William G. Wong, 902B Merritt Drive, Somerville, 
NJ 08876 
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Lists In Stuttered Parentheses. This should not be a 
problem, however, because implementations of Lisp 
will typically “pretty print” lists with indentations to 
make them easier to read. The following examples 
show a function definition, first with no special 
format and then in a “pretty printed” version. I will 
let you decide which of the following is easier to 
read. 


(DEF EXAMPLE (X Y) 
(+ X Y)) ((= @ X) Y) 


(DEF EXAMPLE (X Y) 
(COND {({(> 8 X) (+ XM) 
((= @ X) Y) 
(tT (= 4 Yi) 7 


Lists are actually CONStructed from a simpler 
object called a “CONS” cell or a “dotted pair.” 
"(FIRST . REST)” is a dotted pair where we have 
the FIRST part of a list separated from the REST of 
the list by the dot. Thus (1 . (2 . (3 .()))) is the dotted 
pair representation of (1 2 3), where () is the ““empty 
list.” The empty list is also printed as NIL, so the 
dotted pair representation could also be (1 .(2.(3. 
NIL))). 

List syntax is used instead of the dotted pair syn- 
tax, since it significantly reduces the number of dots 
and parenthesis. A list that does not end with the 
empty list still retains the trailing dot, so (1 . (2 . 3)) 
is shown as the list (1 2 . 3). Essentially, the '’. (’ and 
the corresponding ’’)’’ can be removed from the dot- 
ted pair syntax to get the list syntax. 

Everything is built around the lists and atoms, in- 
cluding expressions, function definitions, and data. 
An expression: is what you find on the right side of a 
Basic assignment statement. Lisp expressions are 
sometimes called “symbolic expressions,” or simply 
“‘s-expressions.” Lisp uses a prefix syntax for expres- 
sion, so the list (+ 1 2) represents the operation 1 + 
2. In fact, unlike Basic and Fortran, which have ex- 
pressions and statements, Lisp has only expressions. 

Although the prefix syntax may be foreign to 
many people, it does have significant advantages. 
One advantage is that Lisp has no operator prece- 
dence to remember, since each expression is a list. 
The other advantage is that functions and parameters 
are easily identified, because the first item of a list 
will be the function and the rest will be the parame- 
ters for all lists being evaluated. This is also true for 
system-defined functions as well as user-defined 
functions. 

The prefix notation is actually not too different 
from the typical function syntax in languages such as 
Pascal or Basic. The only difference is that the left 
parenthesis is moved to the left of the function name. 


(COND ((> @ X) 
Cr (= 2 Xp ))) 


For example, Pascal and Basic would use “SIN 
(45)”, while Lisp syntax would be “(SIN 45)”. Note 
that parameters and results can be lists as well as 
atoms, depending upon the function. 

Lisp’s use of lists and atoms for data as well as for 
expressions and functions is very important, because 
it allows functions to be treated as data and data to 
be treated as functions. Languages like Basic and 
Pascal do not have this type of commonality between 
programs and data. Thus, a Lisp function can gener- 
ate new functions that can be used immediately. In 
addition, a function definition can, if necessary, be 
imbedded in a data structure. 

A function definition list is called a “lambda” ex- 


pression. Lambda is a mathematical term used to des- - 


ignate a method of substitution. Assume the definition 
of “EXAMPLE” is the sample lambda expression: 


(EAMBDA (XY) (LIST 1 ¥ 2 X 3)) 


Evaluating (Example 10 20) would cause X and Y to 
be bound to 10 and 20 respectively. Lisp then evalu- 
ates the body of the lambda expression, which is the 
last item in the list. “LIST” is obviously the function 
in this case, and it is a Lisp function that evaluates its 
arguments and puts them in a list. In this case the list 
would be (1 20 2 10 3) because the variables X and Y 
are replaced by the values bound to them. So the sub- 
stitution process is simply a matter of matching the 
or a to the parameter list and evaluating the 
ody. 

Lisp functions can be called recursively because 
the parameter-binding process is always done with a 
new and unique set of variables, just as it is in more 
common languages like Pascal. The difference be- 
tween Lisp and Pascal, with respect to function calls, 
is in the area of variable-name “‘scope.” Pascal vari- 
able names have a “static scope,”’ while Lisp names 
have a “dynamic scope.” References to statically 
scoped variables are known at compile time, but dy- 
namically scoped variable references can only be 
known when a program is actually running. In fact, 
starting from a different initial state can change the 
variable referenced in a dynamically scope environ- 
ment such as Lisp. This difference in variable-name 
“scope” must be taken into account whenever you use 
Lisp. 

Luckily there are some things that you do not have 
to worry about when using Lisp. In particular, you do 
not have to worry about “garbage.” This is not the 
garbage referred to by the phrase “Garbage in— 
Garbage out.” In Lisp, garbage consists of lists that 
cannot be accessed. To understand how lists can be- 
come inaccessible, a few Lisp functions need to be 
examined. 

These functions are CONS, CAR, and CDR (pro- 
nounced “‘cudder’’). These are the most basic func- 
tions in Lisp and will be found on all implementa- 
tions. The CONS function takes two arguments and 
returns a “CONS” cell whose first element is the 


first argument and whose second argument is the rest 
of the cell. Therefore, (CONS 1 2) would return a list 
of (1 . 2). CONS can be used to build larger lists, as 
shown in the following examples: 

Expression: (CONS 1] (CONS 2? 2)) 

Result: (Jt 6 162-2 Php 

List Syntax: Cli i2) a 3} 


(CONS 1 (CONS 2 (CONS 3 NIL))) 
NIL)}) 


Expression: 
Result: Cy ta EP cer tes 
List Syntax: dh 2} 

Expression: (CONS (CONS 1] 


Result: (0) sf Sw MIE yy) 3 es 
List Syntax: COI 2) Ve, a) 


Obviously the LIST function mentioned before 
uses the CONS function to build a list; however, 
CONS builds a list that does not make a list into 
garbage. This leads to the use of the CAR and CDR 
functions, which are the complement of CONS. 

The CAR and CDR functions are used to access 
the first and remaining portions of a “CONS” cell 
respectively. The CAR and CDR functions are some- 
times called “selector” functions because they “‘se- 
lect” a part of a list. The following examples show 
how the CAR and CDR functions can be used to se- 
lect portions of a list. 


(CONS 2 NIL)) (CONS 2 NJL)) 
. NIL)) 


Expression Result 


(1) CAB GY 23 oe. XD) 8) 
a 

({A (BC) {2 3 
(A B C) 
(0253 xs 
2 


« X) 4) 
(CDR A)) 
(CDR A)) 
(CDR (CDR A))) 


xX) 4) 


(CDR (CAR (CDR (CDR A))))) x 
(CONS (CAR A) (CAR (CDR A))) (1 


One interesting about CAR and CDR is that what 
they return is not a copy of a list but a pointer to the 
element. This is different from the string selector 
functions in Basic like MID$ or LEFT$, which re- 
turn a copy of a string. The operation of CAR and 
CDR allow Lisp to generate lists that share elements 
with other lists. The last result (1 A B C) shares the 
list (A B C) with the variable A. 

But how does the use of CAR or CDR make gar- 
bage? Well, actually, this is not always the case. Gar- 
bage is created only when the list passed to one of 
these functions is not referenced elsewhere. Assume 
that the variable A in the previous example is a local 
variable in a function and that result of (CDR A) 
was returned by this function. The “CONS” cell ref- 
erenced by A becomes garbage because A is not 
needed anymore. However, element 1 may not be 
garbage because there may be another reference to it 
in another list. 

This leads to a simple definition of garbage in a 
Lisp system. “Garbage” is any “CONS” cell or atom 
to which there is no reference that is not itself gar- 
bage. This of course means that there is some root 
which is not garbage. In Lisp, the root is the list of 
objects that you want to keep. This list is called the 
OBLIST (i.e., object list). 

Now I mentioned that in Lisp you do not have to 


A BC) 


Lisp’s use of lists and atoms for data as well as for 
expressions and functions allows functions to be 
treated as data, and data to be treated as functions. 
Languages such as Basic and Pascal do not have 
this type of commonality between programs and data. 
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worry about garbage. What happens to it, then? 
Well, Lisp has a “garbage collector,”’ of course. The 
garbage collector will go through the Lisp universe 
and find all the garbage. It gives all the garbage 
“CONS” cells back to the Lisp system so they can be 
used in new lists generated by CONS. In fact, Lisp 
will normally call the garbage collector whenever it 
runs out of space. 

In Pascal, there are pointers that could be used to 
make lists as in Lisp. However, you must keep track 
of all the lists and the garbage. This process is simple 
if each element has only one reference to it, as is the 
case in a basic tree structure. There are, however, 
many useful structures that are not trees; in these, an 
element may have more than one reference to it. An 
element is garbage only when a// references to it are 
removed. 

Pascal requires you to build your own garbage col- 
lector if you use lists. Building such a program is not 
too bad if there is only one reference to each element. 
But much of the power of Lisp lies in the fact that 
lists can be manipulated and referenced in arbitrary 
ways. In Pascal, keeping track of what is garbage 
would be very difficult; in addition, Pascal’s strict 
type checking would require a different garbage col- 
lector for every data structure used. 

In Lisp, there is just one garbage collector that is 
available to all Lisp programs, and that operates ef- 
fectively on all data types. Nevertheless, garbage col- 
lection does not come free in Lisp any more than in 
Pascal. It takes time to do the operation; the amount 
of time depends upon the number of lists and the 
amount of garbage, but can become quite large. The 
Lisp garbage collector is automatically started when 
you run out of space, which greatly simplifies the use 
of lists. This is important because lists are Lisp’s 
bread and butter. 

In fact, BREAD and BUTTER can be atoms and, 
in Lisp, atoms can have “properties” that are not 
found in procedure-oriented languages such as Basic 
or Pascal. Lisp keeps the properties of an atom on a 
“property list”’—that is, an ordinary list that can be 
accessed using special functions that retrieve, add, or 
delete properties from the list. 

Allowing atoms to have characteristics that are ac- 
cessible through the property list is one way in which 
Lisp allows us to model the real world. For example, 
BUTTER could have the properties COLOR, 
SALTED, and WHIPPED, the current values being 
YELLOW, T (yes), NIL (no). T and NIL are the 
Lisp boolean values for true and false. Of course 
BUTTER can have other properties and need not 
have the ones listed here. 

Although this “short” overview is getting a bit 
long, there are two other functions, found in all im- 
plementations of Lisp, that need to be mentioned. 
The first is the QUOTE function. QUOTE takes one 
argument and returns this argument unchanged, 
without evaluation. For example, (QUOTE (+ 1 2)) 
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A single garbage collector is available to all programs. 
It starts automatically when you run out of space, 
which greatly simplifies the use of lists. 


returns the list (+ 1 2), not the atom 3. QUOTE can 
sometimes be shortened to an apostrophe so that (+ 
1 2) is the same as (QUOTE (+ 1 2)). 

The second function is the COND function, which 
is equivalent to a Pascal “IF” statement, but more 
powerful. It is sometimes called a “McCarthy condi- 
tional” after John McCarthy. The COND function 
takes one or more lists as arguments, and evaluates 
them in a special way. It evaluates the first element 
of the list, which is the “test.” If the result is NIL, 
then the next argument is tested in the same fashion. 
Otherwise, the remaining portion of the list is evalu- 
ated, the result of this evaluation being the result re- 
turned by the COND function. COND returns NIL 
if all tests return NIL. An example would be: 


(COND ((> A 6) 1) 
((= & 2)" 8) 
(i< A. ®) <1) ) 


This is really the absolute value function definition, 
where A would be the parameter. The result of the 
first test would be T (true) if A is a positive number, 
in which case the result would be the number one. 
The results of the other tests should be obvious. In 
addition, a non-numeric result would return NIL if 
the comparison functions returned NIL for non-num- 
eric arguments. The last comment is implementation 
dependent. 

COND provides a compact syntax, since it elimi- 
nates the extraneous IFs and ELSEs found in Pascal. 
COND also replaces the GOTO branching state- 
ments typically found in Basic. The power of COND 
is enhanced by fact that the conditional part of a 
COND function can be any Lisp expression, as in the 
following example, which returns the absolute value 
of X. Negative numbers are those which are not pos- 
itive, and the absolute value of a negative number is 
found by negating it. 


(COND ((< @ X) X) 
(T (- X))) 


You should now be able to take a look at a set of 
Lisp functions and be able to get a good idea of what 
is going on. Of course, having a description of the 
built-in functions would help immensely. This infor- 
mation can typically be found in the books on Lisp 
and in the user documentation supplied with the var- 
ious Lisp packages. 

With the basics of Lisp well in hand, it is now time 
to take a look at some of the implementations of Lisp 
under CP/M. The best place to start is with the doc- 
umentation supplied with each package. 


Documentation 
Unfortunately, documentation is the one area where 
very few software packages shine. Someday, perhaps, 
software developers will get it into their heads that 
the documentation is as important as the software it- 
self. The manuals supplied with these three Lisp 
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packages are very short; they also assume that you 
know quite a bit about Lisp. None of the manuals can 
be classed as more than barely adequate. Given this 
major criticism, the internal quality of the documen- 
tation is still the bottom line, and it differs signifi- 
cantly among the three packages. 

muLisp-80 documentation is better than most in 
terms of organization. It includes a good index and 
bibliography, which no documentation should be 
without. In fact, it contains separate indices for Lisp 
functions, variables, and concepts, along with a de- 
scription of what is on the distribution disk. It also 
tells the user (near the beginning of the manual) how 
to back up the original disk and how to enter and exit 
muLisp-80. 

Unfortunately, muLisp-80 uses the Backus-Naur 
Form (BNF) syntax to describe Lisp, instead of using 
Lisp itself. This is extremely confusing and makes the 
manual difficult to use, since BNF is different from 
the Lisp syntax. The descriptions are also devoid of 
useful examples that would help first-time Lisp users. 
Calling documentation a “user’s manual” is no ex- 
cuse for omitting examples or for using unhelpful 
variable names like X, Y, and Z. Because of these 
faults, the description of the internal data structures 
and machine language interface is confusing to the 
point of being almost useless. Luckily, interfacing 
muLisp-80 to the machine should not be required. 

muLisp-80 documentation also mentions a support 
program called CONTINUE. This “program” must 
be used with extreme care! It is actually a kludge that 
is required because muLisp-80 can exit to CP/M 
very easily, especially when you really do not want it 
to! Even worse, you could lose a lot of work in the 
process. CONTINUE.COM is actually a zero-length 
program file that can be run immediately upon exit 
from muLisp-80. The result is that no program is ac- 
tually loaded; hence the previously loaded program, 
hopefully muLisp-80, will start to run again. In fact, 
muLisp-80 configures itself so as not to reinitialize 
itself; therefore, if you re-enter muLisp-80 via CON- 
TINUE.COM, your Lisp program and its data will 
be preserved. 

This would all be fine and dandy if the procedure 
were explained well, but it is not. CONTINUE was 
actually put in so that you could use built-in CP/M 
commands like DIR and ERA, which are operations 
not supported by muLisp-80. The only alternative to 
using CONTINUE.COM would be to exit the cur- 
rent Lisp session, use the commands, and then reload 
muLisp-80 along with your functions. There is a 
catch, however. CONTINUE works properly only 
for the built-in CP/M commands. Using CONTIN- 
UE after running a .COM utility (PIP, for example) 
will restart that utility, not muLisp-80—thus you will 
lose your Lisp program and all its data. 

The SuperSoft Lisp manual is one of the worst I 
have ever seen, and the nondisclosure agreement is 
almost frightening. This agreement indicates that 


none of the underlying concepts, documentation, user 
interface, or code fragments can be disclosed, so | am 
not sure if I can even review this package without 
violating the agreement. This alone would probably 
keep me from using it for anything useful. 

The rest of the documentation is as bad as the non- 
disclosure agreement. It contains no index or biblio- 
graphy. It does not tell you how to back up the distri- 
bution diskette (or even why you should do so), how 
to start the program, or how to exit. Even a directory 
of the contents of the distribution disk is absent. 

The document requires a very good background in 
Lisp just to understand it. Examples are almost non- 
existent, and those which are present have no decent 
explanation. The text is disorganized, and even the 
text alignment is terrible. Margins seem to have gone 
the way of the dodo bird. The definitions of the Lisp 
functions are not “pretty printed” but mashed into an 
entire line, making them unreadable. The sections on 
internal structure and machine language interface 
suffer not only from these problems but also from a 
lack of clarity. 

The Stiff Upper Lisp manual is one of the better 
ones. The implementation was based upon a com- 
monly used dialect of Lisp called MacLisp, which 
originated at MIT. It is a subset and has some differ- 
ences and extensions. The best thing about this docu- 
ment is that it references the book (included in the 
package) entitled LJSP by Winston and Horn (see 
bibliography). It even has an appendix in the back 
that indicates the differences between the book and 
implementation. The location of the differences in 
the book are noted, and additional examples are giv- 
en which show how the same thing can be done using 
the Stiff Upper Lisp package. In fact, there is a cross- 
reference between all the MacLisp functions and the 
corresponding Stiff Upper Lisp functions. 

This is not to say that the Stiff Upper Lisp docu- 
mentation is perfect. Even though it references one 
book, it does lack a bibliography. It, too, does not tell 
you how to start or exit the program. Initial use of the 
system is by trial and error. You have to guess that 
you start Lisp by typing UPLISP, and that you re- 
turn to CP/M by entering a control-C in response to 
any Lisp prompt (very bad usage). This omission is 
unforgivable, since a sample session is one of the first 
sections in the manual. The sample is poorly placed 
because it comes before any information about Lisp 
itself. The order of the other sections is also poor, 
with extremely technical information presented be- 
fore any kind of general information or overview. 

The presence of examples is a good feature, al- 
though they are not included with every function def- 
inition. The most useful one is in the area of the 
“auto-loading” of functions from disk. An auto- 
loaded function actually has a small resident defini- 
tion responsible for loading the main function from 
the disk the first time the function is called. Once the 
main function has been loaded, the small resident 
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function becomes garbage, because all references to 
that function are now made to the main function def- 
inition. 

The advantage comes in the form of space savings, 
since unused functions are disk resident. Only those 
functions that are actually used need be loaded into 
memory. Although most Lisp implementations sup- 
port this type of loading, the operation is not always 
described. This is too bad, since auto-loading is one of 
the most useful features of Lisp. It is especially pow- 
erful in that you are able to write the auto-load func- 
tion to your own specifications. Pascal and Fortran 
sometimes have overlay operations available, but 
they usually cannot be modified by the user. 

In all three packages, the bottom line in the docu- 
mentation area is that a separate book on Lisp is re- 
quired for all but the expert Lisp user. Stiff Upper 
Lisp wins this round, with muLisp-80 coming up sec- 
ond. I just hope that the next edition of software doc- 
umentation improves significantly. 


List compatibility and enhancement 
Unfortunately there is no Lisp standard, although 
projects are underway to develop “Standard Lisp” 
and “Common Lisp.” In the meantime, the major 
dialects of Lisp include MacLisp, UCI/Rutgers Lisp, 
Franz Lisp, and InterLisp. Stiff Upper Lisp does the 
best in the area of compatibility, since it is a pretty 
good subset of MacLisp. SuperSoft Lisp is a subset of 
the original Lisp 1.5 specification, but the set is too 
small to be useful. A discussion of the enhancements 
in each package is the best way to get an idea of the 
differences between the packages. 

The muLisp-80 designers did a few things that pre- 
vent this implementation from being a true subset of 
any Lisp, which makes it difficult to transport pro- 
grams between muLisp-80 and other Lisp systems. 
First of all, the PROG, GO, and RETURN functions 
do not exist in muLisp-80 and are replaced by an un- 
conventional form of the LOOP function. The PROG 
function provides a conventional statement type exe- 
cution mode that differs from the normal Lisp func- 
tional execution mode. Its absence simply makes it 
difficult to move Lisp programs from other systems 
to muLisp-80. As a general rule, however, the PROG 
function should be avoided, since it uses the nonstruc- 
tured GOTO statement (GO). 

“Auto-quoting”’ is another muLisp-80 feature that 
can cause confusion. This feature causes the initial 
value of an atom to be itself instead of NIL, the con- 
ventional value. This would be like having a Basic 
string variable initialized to the name of the variable 
instead of to a zero-length string. The feature can 
lead to confusion on the user’s part. 

For example, a typical application of the auto- 
quote option would be using the atom MYFILE as a 
parameter to the function that reads a file. If MY- 
FILE has not been used before, its value would be 
MYFILE instead of NIL because of the auto-quote 


option. The function would use the value of MYFILE 
(which is MYFILE) as the file name. This would 
work well; however, if the value of MYFILE were 
changed to something else (e.g., NIL), then a subse- 
quent use of MYFILE with the same function would 
give different results because the system would look 
for a file named NIL. 

muLisp-80 also has the bad habit of never gener- 
ating an error, even if the function is undefined. Eval- 
uation of a list whose function is not defined causes 
the list to be returned as the value of the evaluation. 
Thus, the evaluation of the list (+ 1 2) returns (+ 1 
2), since ‘“‘+” is not a defined function. The proper 
muLisp-80 function would be (PLUS 1 2). Debug- 
ging functions under these conditions is extremely 
difficult, especially for the first time. Typographical 
errors are very hard to find. 

The way in which muLisp-80 binds function argu- 
ments to parameters can also cause problems. First, 
any extra arguments given to a function are ignored; 
second, parameters are bound to NIL if there is an 
insufficient number of arguments. The first instance 
causes problems if you forget the proper number of 
arguments, because the functions will always work. 
The second was required since the PROG function 
was eliminated, and there is no easy way of creating 
local variables that are not parameters. This mode of 
operation means you can call a function with just 
about anything, and get some sort of result back. 

Mulisp-80 has one last feature that makes the pro- 
grams shorter, but harder to understand and difficult 
to migrate. The body of a function definition is really 
evaluated as if it were the argument of the COND 
function. This implied COND function saves space, 
which is important in a small version of Lisp; but it 
also leads to a confusing Lisp syntax (see Figure 1). 
The addition of these muLisp-80 features was done 
with good intentions, but they lead to problems when 
debugging and running programs. 

SuperSoft Lisp provides the FUNCTION func- 
tion, which can be used to create a functional argu- 
ment known as a FUNARG. A number of papers 
have been written on the subject of the FUNARG, 
both for and against it, but it is a useful device. The 
muLisp-80 implementation does not provide this 
function; Stiff Upper Lisp provides a more powerful 
operation called a “closure” that will be discussed in 
more detail later. 

SuperSoft Lisp also implements a special “‘proper- 
ty” called APVAL, which seems to mean “apparent 
value.” It is a feature not found in any other Lisp that 
I know of. The existence of APVAL in the property 
list of an atom causes the system to bypass the nor- 
mal evaluation mechanism of Lisp, so that the value 
of an atom will always be the property value asso- 
ciated with APVAL if this exists, even if the atom 
has been assigned another value. Figure 2 shows how 
APVAL can be used to implement a lock function 
that cannot be undone by simply changing the value 


There is no Lisp standard, although projects are under way 
to develop ‘‘Standard Lisp’’ and ‘“‘Common Lisp.’’ Major 
dialects include MacLisp, UCI/Rutgers Lisp, and Franz Lisp. 
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of the atom using the normal functions. This seems to 
be a useful example, but it is confusing the use. The 
value of this feature is dubious. 

Stiff Upper Lisp has a number of features not 
found in the other Lisps reviewed here, but some of 
them are found in MacLisp, which is very convenient. 
This is not to say that all the features are useful, but 
most are. First let us look at the useful items. 

The user interface to Lisp consists of a simple loop 
that prompts the user for input, reads the input, eval- 
uates the input using Lisp’s normal function evalua- 
tion mode, and prints the result of the evaluation. 
This is sometimes called the Lisp top level, or the 
READ-EVAL-PRINT loop. It is simple and to the 
point. The value of an atom can be found by simply 
typing the name. Functions are started by entering 
an “‘s-expression.” 

Stiff Upper Lisp uses a different prompt each 
time, for a special reason. The prompt consists of an 
asterisk followed by a number that is incremented 
after each input. The input is bound to the atom that 
is the prompt, and the result is bound to an atom with 
the same number but prefixed by an equal sign. The 
following is a sample of this interface. 


#1 (+ 1 2) 
“2 tt 4 4) 
#3 (+ =1 =2) 


*q *3 
(+ =1 =2) 

In this case, *1, *2, and *3 are bound to (+ 1 2), 
(+ 3 4), and (+ =1 =2) respectively; and the re- 
sults =1, =2, and =3 are bound to 3, 7, and 10 
respectively. The input to prompt *4 returns the in- 
put from prompt *3. 

The advantages of keeping a record of previous in- 
puts and results should be obvious. Not only can you 
use results generated previously, but you can also use 
the resident editor to change any inputs or the results, 
thereby allowing you to correct mistakes. For exam- 
ple, (EDIT *3) would allow you to edit a previous 
entry. Only the last eight sets are saved, so as not to 
use up too much space. 

The user interface is further enhanced by the in- 
clusion of a HELP function. The main HELP func- 
tion resides on disk and is brought in using the “‘auto- 
load” procedure. It gets the bulk of the text for the 
help function from the disk. This makes things slow- 
er, but it is acceptable even on a floppy disk based 
system. It provides an invaluable aid to the user, no- 
vice or expert. The only gripe is that it tries to match 
on exact atom names, so you need to know what you 
are looking for. 

Stiff Upper Lisp also has “read macros,” These 
are single characters that perform a special function 
if encountered in the input stream. You make a char- 


acter into a read macro by adding a function defini- 
tion that has no parameters to the property list of the 
respective character. This function is called whenever 
the character is read using the normal input routines. 
The function can then read items from the input 
stream and return a result. If the result is NIL, then 
nothing is added to the input stream; otherwise, the 
atom or list is added to the input stream. This is one 
function compatible with MacLisp and extremely 
useful. The QUOTE function is a standard use for 
“read macros.” For example, the following inputs 
would be equivalent if the quote character (’) has the 
standard “read macro” definition, which reads the 
next item in the input stream and returns a list in 
which the first element is the atom QUOTE. More 
complex macros can be created. 


Normal Input 


Read Macro Equivalent 


(QUOTE 1) pol 
(QUOTE (1 2 3 4)) va) (elle ee) 


Stiff Upper Lisp also includes a “pretty printer” 
that can be used for displaying information or saving 
definitions on disk. A “pretty print” function really 
needs to be part of any Lisp system, just to ensure 
readability. 

Stiff Upper Lisp supports a CLOSURE that is a 
more powerful version of the FUNARG. A CLO- 
SURE is a special type of Lisp function: it does not 
use the normal “dynamic scope” access method, but 
instead has an “‘association list” (a-list) containing 
all variable bindings that are not parameters to a 
CLOSURE function. An a-list is a list of elements. 
Each element is a list whose CAR is an atom and 
whose CDR is the associated value. The following is 
the a-list where X is 1, Y is 2, and Z is the list (A B 


C). i(k « 33 
(¥ « 2) 
(Z A B C)) 


A CLOSURE retains its a-list and the associated 
values between evaluations. The example given in the 
documentation is for a random-number generator 
function that has the random number seed as a local 
CLOSURE variable. In this example, the seed value 
is changed each time the CLOSURE is called. 

CLOSUREs have one major advantage over nor- 
mal Lisp lambda functions. If the last function eval- 
uated in a CLOSURE function is to another CLO- 
SURE, then the result of the last evaluation would be 
the result for the initial CLOSURE. Normally Lisp, 
like Pascal, would keep the information about the ini- 
tial function call on the internal evaluation stack. 
However, since the last function call isa CLOSURE, 
it does not need this information because CLO- 
SUREs use the a-list to access variables other than 
parameters. The Stiff Upper Lisp system is very 
smart: it discards the state of the initial CLOSURE 
and evaluates the last CLOSURE, returning the re- 
sult directly to the function that called the initial 


The user interface to Stiff Upper Lisp consists of 
a simple loop that prompts the user for input, 
evaluates it, then prints the results. 
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CLOSURE. 

This may seem a bit confusing, but it means that a 
CLOSURE can call another CLOSURE any num- 
ber of times, and the internal stack will not grow one 
bit. CLOSUREs can replace the LOOP and PROG 
functions and provide a better description of opera- 
tions being performed; they can also be as efficient as 
the archaic functions they replace. 


Numbers, strings, and 1/O 

None of the Lisps reviewed here has support for 
floating point numbers. This makes it difficult to use 
them for general-purpose programs, although many 
AI programs use only integers. SuperSoft and Stiff 
Upper Lisp have signed 16-bit integers, but muLisp- 
80 has a unique form of integer that can be one to 
254 bytes in length (see Figure 3) muLisp-80 makes 
programs possible that cannot even be attempted in 
conventional languages such as Fortran, which have 
only double-precision numbers. Imagine, more than 
600 decimal digits of accuracy! 

String handling for all three versions is extremely 
poor (Figure 4). Atom names are strings that can be 
converted to and from lists where each element is a 
single character. This is extremely cumbersome and 
time consuming. The addition of string functions 
would greatly enhance any of these versions of Lisp. 
Control and special characters can be included in 
atom names. Note, however, that muLisp-80 does not 
accept the ESC character (27 decimal) because it is 
also used to interrupt processing by the user. This 
makes it extremely difficult to generate terminal es- 
cape sequences for cursor positioning. 


1/O support and resident Lisp editors 
Traditionally, Lisp has had bad I/O support, and 
these three systems adhere to that tradition. The mu- 
Lisp-80 implementation provides the user with the 
usual single I/O device and, using the ReaD Select 
(RDS) and WRite Select (WRS) functions, allows 
you to select whether the device shall be the console 
or a disk file. All information must be written to or 
read from a disk file once it is opened, at which point 
I/O is from the console. This allows functions that 
can be processed by the normal CP/M text editors to 
be loaded and saved in ASCII text form. There are 
no functions to rename or erase a file. 

There is also a muLisp-80 screen editor, written in 
Lisp, that can be modified by the user. Some docu- 
mentation is provided for just this purpose, but a 
good knowledge of Lisp is required to make changes. 
The resident screen editor assumes a very dumb ter- 
minal, so screen updates often cause an entire line or 
page to be rewritten. Nevertheless, the usefulness of 
a screen editor greatly outweighs this annoyance. The 
editor also has a menu mode that lets you save and 
load functions, set and reset the trace mode on a 
function, and has the ability to edit a function, a vari- 
able, or a property. 


There is also a single-key entry that will put mu- 
Lisp-80 back into CP/M. The CONTINUE.COM 
program must then be used to get back into muLisp- 
80; otherwise you lose everything. Note that if you do 
not have CONTINUE.COM available when you 
exit, and you do not want to lose all your work, you 
can save the entire session as a restarted by entering 
the file name. You will need to know the size of the 
CP/M Transient Program Area (TPA) in order to 
use the CP/M SAVE command successfully. Check 
your CP/M documentation for more information on 
the CP/M SAVE command. 

MuLisp-80 also provides the ability to save and 
restore the entire state of the system on disk, but in a 
more orderly fashion. The SAVE and LOAD func- 
tions operate much faster than the RDS or WRS 
functions; however, the SAVE/LOAD file format is 
binary. This means that it cannot be processed by the 
CP/M text editors, but luckily you can always 
LOAD a file and then save the functions as an ASCII 
text file using the WRS function. 

SuperSoft Lisp is extremely poor in both the I/O 
support and resident editor area. It does have an 
erase function, but only with files of type LSP. The 
LOAD function operates like the muLisp-80 RDS 
function, but the corresponding output function 
writes only ONE list per file. Even worse, the list is 
written as a mass of characters, thus making it al- 
most impossible to process the file with a CP/M text 
editor. About the only saving grace (excuse the pun!) 
is the SAVEFNS function, which takes a list of func- 
tions to be saved as its argument. Unfortunately, 
SAVEFNS saves each function in a separate file, 
thereby wasting quite a bit of disk space on a typical 
CP/M system. 

The SuperSoft resident editor operates only on 
function definitions. It is difficult to use and will 
abort if you enter bad information. This alone makes 
it a pain to use, because it does not save a copy of the 
changes. Using a CP/M text editor and loading the 
functions is the only way to use SuperSoft Lisp, and 
this process is tedious at best. The documentation for 
the editor is just as bad. 

Stiff Upper Lisp I/O support has both good and 
bad points. You can save and restore the state of the 
system in binary form, but the method is hard to use 
and the documentation on it is very poor. The good 
points are that it does have full-fledged rename and 
erase functions, along with fair ASCII text file ma- 
nipulation. 

Stiff Upper Lisp uses the same method of ASCII 
text file access as muLisp-80; however, it can also 
append text to files. A “‘pretty printer” is used to gen- 
erate files, and there are a number of user-alterable 
variables to control formatting parameters such as 
line width. Comments can appear in a file but, to save 
space, they are not loaded. Saving multiple functions 
in a file is reasonable easy. 

The Stiff Upper Lisp resident editor is similar to 


None of the Lisps reviewed here has support for 
floating-point numbers. String handling 
for all versions is extremely poor. 
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WHY YOU NEED MICROSHELL: 


PHASE 1: 
“LITTLE”? FEATURES THAT 
ADD UP TO BIG TIME-SAVERS 


You appreciate MicroShell from the 
moment you run it. Suddenly your CP/M 
computer seems much smarter, more 
powerful, more tolerant of your errors. 
That’s because MicroShell adds features 
to CP/M normally found only on more 
powerful operating systems. 

You spend a lot of time with your com- 
puter. MicroShell makes your time more 
productive. Take the warm-start after you 
run a program or when you change disks. 
MicroShell eliminates it — you can run 
another program immediately. Change a 
disk — even in drive A — and a quick 
command logs it in. No more time lost 
booting up — no more juggling ‘‘system” 
disks with CP/M on them! 

Or how about finding files? Under CP/M 
you have to know what disk the file is on 
and then change disks or preface the file 
name with the disk drive. And if you have 
a hard disk and are using CP/M user 
numbers, you also need the user number 
the file is in. MicroShell automatically 
searches for files on all disks, or selected 
disks — your option. And it works even 
when a program calls for a file. So you can 
run WordStar, for instance, from any disk 
or user number and MicroShell finds the 
necessary WordStar files. 

Running several programs in a row? 
MicroShell lets you put a string of CP/M 
commands on one line. You end the dis- 
traction of entering commands, waiting 
for execution, then entering the next 
command. 


Make a mistake? With CP/M you have 
to start over. Add MicroShell and you can 
edit the last command line (with simple 
WordStar commands). MicroShell saves 
the last command string, so you can run 
through a series several times — or change 
commands slightly and run again — with- 
out retyping. 

MicroShell doesn’t affect how your 
CP/M runs. It helps CP/M, but it doesn’t 
get in the way. And your system probably 
never misses the 8K bytes MicroShell uses 
because most all popular programs run 
with 48K. So in a 64K CP/M system, there’s 
plenty of room. For the rare, big program, 
it’s easy to exit MicroShell, run the pro- 
gram and re-enter MicroShell. 

You appreciate MicroShell from the 
start. It has powerful features so easy-to- 
use that the MicroShell manual tells you 
“How to Run MicroShell Without Reading 
the Manual”. 


PHASE Il: 
NEVER RE-ENTER DATA AGAIN 


But please — read all 75 pages of the 
manual and get to know MicroShell in 
depth. You appreciate MicroShell more 
and more when you do the big projects 
you bought your micro for. 

Take the time you turn a spreadsheet 
analysis into a table for a report. Without 
MicroShell you have to re-enter data in a 
file for your word processing software. 
Why the duplication of effort? MicroShell 
lets you redirect the output of any pro- 
gram to a file — no duplicated keystrokes. 

MicroShell captures what appears on 
your CRT and sends it anywhere. Send 
data to your printer for hard-copy or save 
it on disk. Or capture that report your ac- 
counting program sends to the printer. 
MicroShell tames your data-handling jobs 
— it even ‘slows down”’ to feed pro- 
grams that process input slower than 
MicroShell sends it. 

When you review your work, MicroShell 
has a ‘‘TYP’’ command that displays 23 
lines (an average CRT screen) then stops 
until you hit a key. If you’ve ever scanned 
a long document whipping by at 10 or 20 
lines per second, you know you need this 
feature. Or have you tried to hit control-S 
in time to stop the display and missed? 


For more information about MicroShell, 

see the following reviews: 

Christopher Kern, BYTE, December, 
1982 


Alan R. Miller, Interface Age, July, 1982 
David Fiedler, Microsystems, January, 
1983 
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NEW POWER FOR CPM SYSTEMS 


PHASE Ill: 
THE SYSTEM EVOLVES 
WITH YOU 


If you’re in computers for the long haul, 
MicroShell will grow on you. MicroShell 
helps you teach new users. And it lets you 
develop new capabilities in a clear and 
logical way. 

MicroShell lets you set up ‘‘menus’”’ to 
make your system ‘“‘friendly’”’ for non- 
technical users. And fast — no slow CP/M 
“suomit”’ files used. As you develop your 
own software, MicroShell’s “pipe” feature 
lets you grow into ever more sophisti- 
cated applications. It links simple pro- 
grams together by directing the output of 
one program to the input of another. 

Just as MicroShell lets you combine 
commands on one line, it lets you save 
any command series in a file. MicroShell 
reads and executes commands directly 
from the file — no slow, intermediate 
steps. For example, you can compile, link 
and run a program with one command, 
“compile filename’. MicroShell executes 
all the commands from a file you’ve built. 

And you can call other command files 
from within a command file to enlarge on 
what you’ve built. You can set conditional 
commands with an “IF” statement. Or you 
can set command files to call for input 
from a user and act on it. Before you know 
it, you have a system much more power- 
ful and friendly than bare CP/M. 


SO DON’T WASTE ANY MORE TIME 
WITH YOUR CP/M SYSTEM — ADD 
MICROSHELL TO IT TODAY. 


ORDER LINE 800-368-3359 


Available for all popular 8080, 8085 or 
Z80, CP/M 2.2 systems on 8” or 5%” 
diskette. 


Price: $150.00 ($25.00 manual only). 
Foreign orders add $20.00 for Air 
Mail shipment. 


NEW 
GENERATION 
SYSTEMS, inc. 


2153 Golf Course Drive 
Reston, VA 29091 


(703) 476-9143 


CP/M® , MP/M™ — Trademarks of Digital Research. 
WordStar® — Trademark of MicroPro. 
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the SuperSoft Lisp editor, except that it is more pow- 
erful and traps some, but not all, errors. The editor 
source is available and can be modified to trap all 
errors. You can edit functions, values, and lists in 
general. It is not as easy to use as the muLisp-80 
editor, but it is adequate for the job. 


Error handling 

Error handling in muLisp-80 is very poor. Evaluation 
of an undefined function causes the list to be returned 
as the result, with no indication of an error. For this 
reason, there are no error-trapping facilities, and this 
makes debugging extremely difficult. During func- 
tion evaluation, the system periodically checks the 
console for an escape character; if one is present, the 
system issues a prompt to the user, at which point the 
user has the choice of continuing the computation or 
exiting to the top level of CP/M or muLisp-80. 

SuperSoft Lisp has no error-trapping facilities, 
and all error messages consist of an error number. 
The error numbers are described, but the correspond- 
ing documentation is so poor that a novice would be 
thoroughly confused in many instances. 

Stiff Upper Lisp error handling is a joy to use—far 
superior to the error handling of the other two imple- 
mentations. It has a BREAK package that allows you 
to trace and set break points on any function. It also 
has a single-step mode and provides access to the 
evaluation stack. There are also SPELL and HELP 
functions that can be accessed at any time. 

Errors can be trapped in the Stiff Upper Lisp sys- 
tem using the MacLisp-compatible functions 
CATCH and THROW. These provide a very power- 
ful general-purpose tool that also supports error trap- 
ping. The parameters to CATCH and THROW area 
“label” and an “expression.” The result from a 
CATCH function will be the value of the expression 
if a THROW function is not executed; otherwise, the 
result is the expression in a THROW function. The 
CATCH and THROW functions are matched by the 
label, and a NIL label matches anything. A 
THROW will skip over labels that do not match. 

The system signals an error by using a THROW 
label of ERROR, and the top level of the Stiff Upper 
Lisp uses a CATCH with a NIL label to ensure that 
all errors are caught. You can use CATCH to write 
functions that handle all errors, too. One AI applica- 
tion for the CATCH and THROW functions would 
be a search function that would return the result via 
THROW directly to the corresponding CATCH 
function. The functions can also be quite useful in 
providing a user-friendly interface. 


Garbage collectors 

The muLisp-80 garbage collector is automatic and 
compacts the garbage into the top of memory. The 
compacting garbage collector speeds up execution, 
because new CONS cells are simply taken from the 
top of memory. The collector can be initiated manu- 
ally, and it may optionally print statistics on the 


amount of free space. 

The presence of the SuperSoft Lisp garbage collec- 
tor is hidden in the machine representation area. The 
description is very bad. It can be started manually, 
but this has to be done by using the POKE function 
to change absolute memory locations. Luckily, the 
garbage collector works automatically; this should be 
good enough for most applications. 

The Stiff Upper Lisp garbage collector can be 
started manually through a function. It is a typical 
implementation with no special features. 

The garbage collection time for all the systems is 
less than one second and usually does not interfere 
with the speed of operation. Manual initiation is pos- 
sible; however, the automatic nature of the garbage 
collector usually makes this unnecessary. 


Performance 

Flexibility is the area where Lisp excels with its list 
data structures. Execution speed of loops and arith- 
metic compares favorably with that of Basic inter- 
preters, although compilers will run rings around 
Lisp in numeric calculations. In general, muLisp-80 
runs about as fast as MicroSoft Basic; Stiff Upper 
Lisp and SuperSoft Lisp run at about half that speed. 
None of the Lisp systems had floating point, so all 
tests were run with integers. 

I/O to the terminal was just as good as Basic or 
Pascal in all cases, but all the Lisps reviewed are very 
deficient in the area of formatted output. Functions 
for printing lists without parentheses normally have 
to be written by the user, but this is not a big problem 
in an extensible language like Lisp. 

All the Lisp systems compared very poorly with 
Basic when doing string or array-oriented operations. 
This was to be expected because the string-handling 
functions in Lisp are very poor. Arrays have to be 
simulated using lists; however, the lists must be ac- 
cessed in a sequential fashion, which is slower than 
indexing an array. Some implementations of Lisp do 
provide strings and arrays implemented in the nor- 
mal fashion. 

A big problem with all the packages is space for 
the Lisp lists and atoms. They all have around 6 to 8 
thousand “CONS” cells; this might sound like a lot, 
but they disappear quite fast. A typical function def- 
inition can consume around 50 cells. It is sufficient to 
do quite a bit of work and is more than acceptable for 
anyone wishing to learn Lisp. Also, the garbage col- 
lection overhead does become larger as the number of 
free cells becomes smaller. This is because the gar- 
bage collector is called more often as you use up a 
smaller number of “CONS” cells in a shorter amount 
of time. 

Lisp performed much better than Basic on list- 
oriented problems, which seems only natural. Lisp 
can also perform functions that I would not even at- 
tempt to do in Basic or Pascal, because they would be 
too complex or impossible in those languages. For ex- 
ample, a program to do symbolic differentiation can 


Flexibility is where Lisp excels with its list data 
structures. Execution speed is good for loops. 
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be written easily in Lisp, but would be difficult in 
most other languages. 


Summary 

Stiff Upper Lisp seems like the most powerful pack- 
age of the three. It matches MacLisp very well, and 
has good user support and a good set of basic func- 
tions. It is the one package that I can recommend. 

The muLisp-80 error-handling facilities greatly 
detract from an otherwise good implementation of 
Lisp. Although it does not match any existing dialect 
of Lisp well, it does have a reasonably complete set of 
functions. The resident screen editor provides a good 
user environment. The large integer capability of 
over 600 decimal digits is unmatched even in other 
languages. It is used as the basis for a companion 
product called muMath-80, which provides symbolic 
math manipulation functions such as symbolic differ- 
entiation. muLisp-80 is also the fastest of the three 
packages, and is good if you would like to get a taste 
of Lisp. 

SuperSoft Lisp cannot be recommended for even a 
casual user. It will be a disappointment to a novice 
and frustration to an expert. Bad documentation just 
adds to the user’s frustration. Luckily, the other al- 
ternatives are better. 

It is nice to see Lisp available under CP/M be- 
cause it is unlike most other languages in the market- 
place. It can do jobs that are impossible or extremely 
difficult in procedure-oriented languages such as Ba- 
sic and Pascal. Its functionality and extensibility 
makes jobs easier to do in a small amount of time. 
Although Lisp was intended for the AI community, it 
has much to offer all users. I think you will have fun 
using Lisp as a tool. 

Lisp is becoming more popular on microcomput- 
ers, and these three implementations are only the tip 
of the iceberg. A review of three more Lisp systems 
for microcomputers is in the works, and will appear 
in Microsystems soon. 
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Submit file to patch Stiff Upper Lisp 
XSUB 
DDT UPLISP.COM 
A1lGB 
CALL 3C886 


SAVE 6@ UPLISP.COM 


Above is a listing of a CP/M submit file that will make 
the distribution version of Stiff Upper Lisp read the 
file INIT.LSP from the CP/M default drive instead of 
only from drive A, so you do not need a disk in drive A. 
The commands can also be entered manually, in which 
case the XSUB command can be ignored. 


Stiff Upper Lisp CLOSURE example 


Stiff Upper Lisp CLOSURE Factorial Definition Example 


Recursive Definition: 


(DE FACTORIAL (N) 
(COND ((< N 2) 1) 
(T (* N (FACTORIAL (- N 1)))) ) ) 


CLOSURE Definition: 


(CDE () FACTORIAL (N) (FACTORIAL1 1 N)) 
(CDE () FACTORIAL] (RESULT N) 
(COND ((< N 2) RESULT) 
(T (FACTORIAL1 (* RESULT N) {- N 1))) ) ) 


LOOP Definition: 


(DE FACTORIAL (N) 
(LET ((RESULT 1)) 
(LOOP EXIT ((< N 2) RESULT) 
(SETQ RESULT (* RESULT N)) 
(SETQO N (=~ N1)) ) ) ) 


Execution of (FACTORIAL 25) would require 25 
stack levels using the recursive definition and one for 
the CLOSURE and LOOP definitions. The recursive 
definition can be written like the CLOSURE defini- 
tion; however, it would still not use one stack level. 
Note that the LOOP definition requires a local vari- 
able supplied by LET and uses assignment state- 
ments to change the state of the computation. 


Bill Wong is currently doing program development 
for Rising Star. He received his M.S. in Computer 
Sciences from Rutgers University and is currently 
working on his Ph.D. His B.E.E. is from Georgia 
Tech. Bill is interested in microcomputer systems, 
parallel processing, and artificial intelligence. 


A program to do symbolic differentiation can 
be written easily in Lisp, but would be 
difficult in most other languages. 
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Figure 1. muLisp-80 Implied COND Example. 
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Figure 2. SuperSoft Lisp APVAL Example. 
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Figure 4. String Manipulation Functions for Stiff Upper Lisp. 
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Each Carousel Tool does the 


right thing well, 


and all 60 Tools work well together. 


format 


sort : uniq 


Use-A-ToolKit $249 


CAROUSEL’S SOFTWARE TOOLS FOR CP/M give you 
many more ways to use your computer effectively for 
documentation, programming and data house-keeping. 
Each Tool does only one thing—and does it well— 
making each Tool easier to use and remember. 


YOU BENEFIT from using standard tested programs 
and a UNIX-like control shell that pipelines data be- 
tween Tools, redirects I/O to different files and devices, 
and accepts scripts of Tool commands to perform com- 
plex tasks. Now you can have 60 Tools working together 
to do the right thing well. 


ORDER TODAY: a Carousel Use-a-ToolKit is $249; a 
Carousel Build-a-ToolKit is $395; a manual is $40. 


CALL (415) 528-1300 or write 


Carousel MicroTools, Inc. 


609 KEARNEY STREET, EL CERRITO, CALIFORNIA 94530 
formerly known as Unicorn Systems 


CP/M is a trademark of Digital Research. UNIX is a trademark of Ameri- 
can Bell Laboratories; Carousel Tools, Carousel! Use-a-ToolKit and 
Carousel Build-a-ToolkKit are trademarks of Carousel MicroTools, Inc. 


CIRCLE 6 ON READER SERVICE CARD 


LENGTH 


FLATSIZE 


51, inch Disk Drives 


Tandon TM 100-1 single sided, double density 48 TPI 
MSM-551001 $219.95 ea 2 for $199.95 ea 
Shugart SA 400L Sigle sided, double density 40 track 
MSM-104000 $234.95 ea 2 for $224.95 ea 
Tandon TM 100-2 Double sided, double density 48 TPI 
MSM-551002 $294.95 ea 2 for $269.95 ea 
TEAC FD55A_ Single sided, double density 40 track 
MSM-660551 __. $299.95 ea 2 for $239.95 ea 


51, inch Cabinets with Power Supply 


END-000216 Single cab w/power supply 
END-000226 Dua/ cab w/power supply 


$69.95 
— $94.95 


8 inch Disk Drives 
ERs ee] 


Siemens FDD 100-8 Single sided, double density 
MSF-201120 $274.95 ea 2 for $249.95 ea 
Shugart SA 801R Single sided, double density 
MSF-10801R $394.95 ea 2 for $389.95 ea 
Shugart SA8&51R Double sided, double density 
MSF-10851R $554.95 2 for $529.95 ea 
Qume DT-8 Double sided, double density 
MSF-750080 $554.95 2 for $529.95 ea 


Tandon TM848-1 Single sided, double density thin line 
MSF-558481 $379.95 ea 2 for $369.95 ea 
Tandon TM848-2 Double sided, double density thin line 
MSF-558482 $494.95 ea 2 for $484.95 ea 
NEC FD1165 Double sided, double density half high 
MSF-558482 $485.00 ea 2 for $449.95 ea 


Dual Disk Sub Systems 
IEE a Pa eae aes 


Disk Sub-Systems - JADE 


Handsome metal cabinet with proportionally balanced air 
flow system, rugged dual drive power supply, power cable 
kit, power switch, line cord, fuse holder, cooling fan, never 
mar rubber feet, all necessary hardware to mount 2-8 inch 
disk drives, power supply, and fan, does notinclude signal 
cable 


Dual 8-inch Sub-Assembly Cabinet 


END-000420 Bare cabinet — —— $49.95 
END-000421 Cabinet kit $199.95 
END-000431 A & T $249.95 


8-inch Sub-Systems - Single Sided, Double Density 


END-000423 Kit w/2 Siemens FD100-8Ds $650.00 
END-000424 A & T w/2 Siemens FD100-8Ds __ $695.00 
END-000433 Kit w/2 Shugart SA-801Rs $999.95 


END-000434 A & T w/2 Shugart SA-801Rs __ $1195.00 


8-inch Sub-Systems - Double-Sided Double Density 


END-000426 Kit w/2 Qume DT-8s _________ $1274.95 
END-000427 A & T w/2 Qume D-8s $1474.95 
END-000436 Kit w/2 Shugart SA-851Rs ______ $1274.95 


END-000437 A & T w/2 Shugart SA-851Rs __ $1474.95 


S-100 Disk Controllers 


DISK 1 - CompuPro 
8 inch or 5%, inch DMA disk controller, single or double 
density, single or double sided, 10MHz 


10D-1810A A&T 
10D-1810C CSC 


$449.95 
$554.95 


Versafloppy Il - SD Systems 

Double density disk controller for any combination of 
51%, inch and 8 inch single or double sided, analog phase 
locked loop data seperator, vectored interrupts. CP/M 2.2 
Oasis compatible, control/diagnostic software PROM 
included 


10D-1160A A & T with PROM 
SFC-55009047F CP/M 3.0 with VF-11 


$359.95 
_ $139.95 


2422 Disk Controller - C.C.S. 


5%, inch or 8 inch double density disk controller with on 
board boot loader ROM, FREE CP/M 2.2 & manual set 


10D-1300A A & T with CP/M 2.2 $399.95 


Double D - JADE 


High reliability double density disk controller with on 
board Z-80A, auxiliary printer port. IEEE S-100 can 
function in multi-user interrupt driven bus 


10D-1200B Bare board & hdwr man $59.95 
1OD-1200K Kit w/hdwr & sftwr man $299.95 
10D-1200A A & T w/hdwr & sftwr man $325.95 
SFC-59002001F CP/M 2.2 with Double D ______ $99.95 


S-100 Package 


a ae Ea eee ae 
10 Megabyte S-100 Package 


If your data storage needs have outgrown your floppy- 
based S-100 system, Jade now gives you the opportunity 
to add a fast reliable hard disk package to your system 
at a bargain price. Shugart SA1004 8-inch 10MB 
Winchester, X Comp S-100 controller for SA1004, your 
choice of X Comp CP/M auto-attach software (for most 
S-100 systems) or "WD BOOT” PROM (for SD Systems 


board sets) Cables and manuals. included, 
limited quantity 

MSH-991000 with SD Boot Prom $1295.00 
MSH-991002 with Auto attach software __. $1295.00 


Disk Tubs 
Ree RS eal 


Diskette Storage Boxes 
Clear Plexiglass storage boxes for up to 75 Diskettes 


MMA-505 Holds 75 5')," Diskettes $19.95 
MMA-508 Holds 50 8" Diskettes —__ _ $24.95 


PLACE ORDERS TOLL FREE 


Continental U.S. 
800-421-5500 


Inside California 


800-262-1710 


We accept cash. checks. credit cards. or Purchase Orders from qualified firms and institutions 
Minimum prepaid order $15.00 California residents add 6'% tax. Export customers outside the U.S. or 
Canada please add 10% to all prices. Prices and availibility subject to change without notice. 
Shipping and handling charges via UPS Ground 50¢/Ib. UPS Air $1.00/lb. minimum charge $3.00 


Modems 
CRE RAL 


Smart Buy in MODEMS - Signalman 


1200 and/or 300 baud, direct connect, automatic answer 
or originate selection, auto-answer/auto-dial on deluxe 
models. 9v battery allows total portability, full one 
year warranty 


1OM-5600A 300 baud direct connect $89.95 
1O0M-5610A 300 baud Deluxe $149.95 
1O0M-5620A 1200/300 baud Deluxe ____ $369.95 
1OM-5650A 300 baud for Osborne $119.95 
JOM-5630A 300 baud card for 1BM $199.95 


Smartmodem - HAYES 


Sophisticated direct-connect auto answer/auto dial 
modem, touch tone or pulse dialing. RS-232C interface, 
programmable 


10M-5500A Smartmodem 1200 $599.95 
10M-5400A Smartmodem 300 $224.95 
1OK-1500A Hayes Chronograph $218.95 
1OM-1100A Micromodem 100 __ $368.95 


1OM-2010A Micromodem Ii w/term prgm ——— $329.95 
10M-2012A Terminal program for MMII ______. $89.95 


1200 Baud Smart Cat - NOVATION 

103/212 Smart Cat & 103 Smart Cat, 1200 & 300 baud, 
built-in dialer, auto redial if busy, auto answer/disconnect, 
direct connect, LED readout displays mode, analog/digital 
loopback self tests, usable with multi line phones 
1OM-5241A 300 baud 103 Smart Cat ________ $229.95 
1OM-5251A 1200 baud 212/103 Smart Cat ____ $549.95 


J-CAT Modem - NOVATION 


1/5 the size of ordinary modems, Bell 103, manual or 
auto-answer, automatic answer/originate, direct connect, 
built in self test, two LEDs and audio beeps provide 
status information 


10M-5261A Novation — $149.95 


NEW! CP/M plus 3.0 
RCE 


CP/M 3.0 is Digital Research's latest version of the 
industry standard disk operating system. It features many 
performance improvements, such as intelligent record 
buffering, improved diretory handling, “HELP” 
facility, time date stamping of files and many more 
improvements. AND A TREMENDOUS INCREASE IN 
SPEED!! it is fully CP/M 2.2 compatible and requires no 
changes to your existing application software. Available 
only to Versafloppy Il owners with SBC-200 CPUs 


SFC-55009059F Unbanked, $250.00 

SFC-55009057F Banked, $250.00 

SFC-55009057D Manual ___— $50.00 
CP/M Plus On EPROM 

SFC-55009059E Unbanked RS232 $400.00 

SFC-55009057E Banked RS232 —_— $400.00 


For Technical Inquires 
or Customer Service call: 


213-973-7707 


S-100 Memory Boards 
DPM. = 


64K STATIC RAM - Jade 

Uses new 2K x 8 static RAMs, fully supports IEEE 696 
24 bit extended addressing, 200ns RAMs, lower 32K or 
entire board phantomable, 2716 EPROMs may be subbed 
for RAMs, any 2K segment of upper 8K may be disabled, 
low power typically less than 500ma 


MEM-99152B Bare board —____ —— $49.95 
MEM-99152K Kit less RAM - $99.95 
MEM-32152K 32K kit $199.95 
MEM-56152K 56K kit — $289.95 
MEM-64152K 64K kit — $299.95 
Assembled & Tested === saad $50.00 


EXPANDORAMN III 


SD Systems new ExpandoRAM III is a high density S—100 
memory board utilizing the new 64K x 1 dynamic RAM 
chips. It allows memory sizes of 64K, 128K or 256K all ona 
single S-100 board 


MEM-65064A 64K _ $495.00 
MEM-65128A 128K $595.00 
MEM-65192A 192K $675.00 
MEM-65256A 256K $755.00 


RAM 17 - CompuPro 

Meets or exceeds all IEEE 696/S-100 specifications 
including timing - works up to and including 10 MHz with 
8088/86 CPUs Guaranteed to perform flawlessly with any 
IEEE 696/S-100 extended addressing specification 
MEM-64180A RAM 17, 64K A&T $459.95 
MEM-64180C RAM 17, 64K CSC $549.95 


RAM 16 - CompuPro 


There is an alternative to quirk-prone dynamic 
memories: thanks to low power consumption, high speed 
operation, fully static technology, and suitability for8 or 16 
bit systems, RAM 16 represents a new high in performance 
for sophisticated S-100 systems 


MEM-32180A RAM 16, A & T 
MEM-32180C RAM 16, CSC 


RAM 21 - CompuPro 


Operates at 12 MHz with 8088, 8086, 68000. 80286, and 
16032 type CPUs, extremely low power consumption, 
meets or exceeds all IEEE 696/S-100 specifications, 
including timing 


MEM-12810A RAM 27A&T «$995.00 
MEM-12810C RAM 21 CSC ___ _____. $1125.00 


$495.00 
$595.00 


S-100 Motherboards 
EERIE a) 


ISO-BUS - Jade 


Silent, simple and on sale — a better motherboard 
6 Slot (51/," x 8") 


MBS-061B Bare board $22.95 

MBS-061K Kit _ $39.95 

MBS-O61A A&7T_ $69.95 
12 Slot (934" x 854") 

MBS-121B Bare board $34.95 
* MBS-121K Kit $69.95 
MBS-121A A&7T_ $109.95 
18 Slot (141/," x 8%") 

MBS-181B Bare board $54.95 
MBS-181K Kit $99.95 
MBS-181A A & T $149.95 


EPROM Erasers 
EEE 
Ulitra-Violet EPROM ERASERS 


Inexpensive erasers for industry or home 


XME-3100A Spectronics w/o timer $69.50 
XME-3101A Spectronics with timer ___. $94.95 
XME-3200A Logica! Devices $49.95 


S-100 I/O Boards 
SOE RES NES 


INTERFACER 4 - CompuPro 


3 serial, 1 parallel, 1 Centronics parallel 


101-1840A A &T = $399.00 
IOl1-1830C: CSC: _______ $499.00 
1/0-4 - SSM Microcomputer 

2 serial |/O ports plus 2 parallel I/O ports- 

(IGEIG1GAV AE) $249.95 
1/0-5 - SSM Microcomputer 

Two serial & 3 parallel ports, 110-19.2K Baud 

101-1015A A&T = = $289.95 
INTERFACER 2 - CompuPro 

3 parallel, 1 serial and interrupt timer 

101-1820A Interfacer 2,A & T $289.95 
101-1820C /nterfacer 2, CSC $359.00 


INTERFACER 3 - CompuPro 


5 or 8 channel serial 1/O board for interrupt driven 
multi-user systems up to 250K baud 


101-1830A Interfacer 3/5 A & T $558.00 
101-1831A Interfacer 3/8 A & T $628.00 
101-1830C /nterfacer 3/5 CSC ___ sd $628.00 
101-1831C Interfacer 3/8 CSC $748.00 


MPX-1 - CompuPro 
Multi-user I/O multiplexer and interrupt controller with 
on board 8085A-2 CPU and 4K or 16K RAM 
1O1-1880A MPX-1, 16K RAM, A & T 
101-1880C MPX-1, 16K RAM, CSC 


$584.00 
$674.00 


S-100 CPU Boards 
Pe CATA ED 


SBC-200 - SD Systems 


4 MHz Z-80A CPU with serial & parallel 1/O, 1K RAM, 8K 
ROM space. monitor PROM included. 


CPU-30200A A&T _ — $329.95 


THE BIG Z - Jade 


2 or 4 MHz switachable Z-80 CPU board with serial I/O, 
accommodates 2708. 2716, or 2732 EPROM, baud rates 
from75 to 9600 


CPU-30201B Bare board w/manua! __________ $35.00 


CPU-30201K Kit with Manual! — $149.95 
CPU-30201A A & T with Manual __— $199.95 
CPU 8086/87 - CompuPro 

CPU 8086/87, based around Intel's highest 


performance 8086 sixteen bit processor, also includes 
sockets for their 8086 sixteen bit processor, also includes 
sockets for their 8087 math co-processor, and 80130 
Operating System Firmware componet 


CPU-70520A CPU 8086/87 A& T _______ $699.00 
CPU-70520C CPU 8086/87 __ = $764.00 
CPU-Z CompuPro 

2 or 4 MHz Z-80A CPU, 24 bit addressing 

CPU-30500A 2/4 MHzA&T _ $279.95 
CPU-30500C 3/6 MHz CSC —_____. $374.95 


8085/8088 - CompuPro 


Both8 & 16 bit CPUs, standard 8 bit S-100 bus, up to 8 MHz. 
accesses 16 Megabytes of memory 


CPU-20510A MHzA&T 
CPU-20510C 6/8 MHz CSC 


—_— $398.95 
___ $479.95 


Letter Quality Printers 
(cee 


Lowest Price Daisywheel Printer - JUKI 


Full featured daisywheel printer with graphics mode and 
built-in word processing functions. 18 CPS print speed, 
13-inch platen, 10, 12, or 15 pitch plus proportioned 
spacing. Uses standard IBM ribbons. This is an extremely 
reliable letter quality printer, at an unheard of low price! 


PRD-61001 Parai/le/ _.__- = == s«$6 29.95 
PRD-61002 AS232 serial board $59.95 
PRA-61000 Tractor option $139.95 


380Z by Data Terminals & Communications 
Based on the same quality mechanism as the Comrex 
printer, the 380Z contains electronic enhancements that 
allow it to print at speeds up to 32 CPS. Other features 
include a 48K buffer, proportional spacing and Diablo 
1640/1650/630 compatible protocol. Comes with 
printwheel, ribbon and users manual. Serial, parallel, and 
IEEE 488 interfaces standard 


PRD-11300 380Z printer $1295.00 
PRA-11000 Tractor option = $169.95 
PRA-12000 Cut Sheet Feeder $699.95 
Printers From JADE 

SEIKOSHA 10" Graphics, 30 CPS $229.95 
OKIDATA 82 10" 120 CPS CALL 
OKIDATA 92 10” 160 CPS __._ CALL 
OKIDATA 93 15" 160 CPS CALL 
OKIDATA 83 15" 120 CPS CALL 
OKIDATA 84 15" 200 CPS CALL 
OKIDATA 2350 15” 350 CPS ___._ CALL 
OKIDATA 2410 15" 350 CPS CALL 
DAISYWRITER 2000 48K Daisywhee! ________ $1395.00 
GEMINI 10 100 CPS with Graphics $349.95 
GEMINI 15 15” with Graphics $499.95 
COMREX CR1 — $849.95 
SILVER REED $699.95 
STARWRITER $1249.95 


S-100 EPROM Boards 
aia a eS 


PB-1 - SSM Microcomputer 
2708, 2716 EPROM board with on-board programmer 


MEM-99510K Kit with manual ——_—___ — $154.95 
MEM-99510A A & T With Manual ________ $219.95 


PROM-100 - SD Systems 
2708, 2716, 2732.EPROM programmer with software 


MEM-99520K Kit with software $189.95 
MEM-99520A A & T with software —_— $249.95 


32K PROM/RAM Board 


The 32K S-100 PROM/RAM board can hold up to 16 each 
2716 style EPROMs, 6116 style RAMs, or 8 each style 
EPROMs. This board was designed to fit into holder S-100 
systems as well as the newer |IEEE-696 S-100 proposed 
standard, addressable as two 16K blocks on any 64K page, 
supports Cromemco as well as Northstar bank select, 
perfect for MP/M systems 


MEM-99153B Bare board & manual $49.95 
MEM-99153K Kit with No RAM $89.95 
MEM-99153A A & T with No RAM $139.95 
MEN-16153K Kit with 16K RAM _____s—S «$129.95 
MEM-16153A A & T with 16K RAM __ —_. $179.95 
MEM-32153K Kit with 32K RAM $179.95 
MEM-32153A A & T with 32K RAM $229.95 
Call Us For Lowest Prices On EPROMs-2732s __ $4.90 


av _-&. TD FE; 
Computer Products 


4901 West Rosecrans Ave. Hawthorne, California 90250 
CIRCLE 16 ON READER SERVICE CARD 


t all started as a social experiment: Take one 
computer, specifically designed, packaged and 
outfitted for the first-time user. Take one po- 
tential user with no computer experience but a 
good application for a computer. The computer 

is Cromemco’s new C10 with 64K and a single disk 

drive. The user is my neighbor, Crosby, who has been 
nosing around the discount electronics stores and 
reading ads for Quick Brown Fox. 


“Hello?” 


“Hey, Crosby, it’s Bill. How would you like a free 
computer?” 


“Yeah? What’s the catch?” 


“Two things. You've got to give it back after a month 
or two and you have to take notes and tell me your 
experiences, good and bad, in learning how to use it. 
In exchange, I'll give you about the same amount of 
help and support you'd expect from a discount elec- 
tronics store.” 


“How much is that?” 
“Almost none.”’ 


“OK, you’ve got a deal.” 


I brought the C10 over, hooked all the cables to- 
gether, booted it, made a few work disks and ran 
through all the programs. Everything seemed to be in 
working order, so I concentrated on the word process- 
ing package. Crosby’s job is to inspect buildings for a 
fire insurance company prior to their being insured. 
He travels around a lot, takes a lot of Polaroids and 
writes a lot of memos. He’s not a bad hand on his 
electric typewriter, but he hasn’t been blind to the 
information age, either. 

To get 4n idea of how beginner-oriented this ma- 
chine is, consider that it doesn’t offer DDT or any 


Bill Machrone, 121 N. Ave., Fanwood, NJ 07023 
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MICROSYSTEMS TESTS THE 


Cromemco C10 System 


by Bill Machrone 
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kind of debugging program. There are two operating 
systems, a ROM-resident extended disk monitor and 
a version of CDOS. The average user will never know 
that the ROM monitor is there. CDOS is Cromem- 
co’s CP/M-compatible operating system. In this 
case, it is a special version for the C10. It has a menu- 
driven “shell” program that calls the other programs. 
The utilities are well developed, transcending many 
of the equivalent CP/M programs. For instance, the 
file listing program pauses at the end of each screen- 
ful and the directory program includes file sizes. 

The C10’s word processing software, WriteMas- 
ter, is a Cromemco-developed package. It includes all 
the popular features, including cut and paste, search 
and replace, mail merge and full screen editing. It 
uses two operating modes, editing and command, to 
keep things simple. It uses the arrow keys rather than 
control codes to move the cursor. Command mode 
features automatic command completion. That is, if 
you type “ED” the system supplies “IT”, signifying 
that you want to edit something. If you type a ques- 
tion mark, WriteMaster displays all the options 
available to you at that point in time. There is a sig- 
nificant amount of on-line help available, a boon to 
the new user. Features include paragraph reform and 
text alignment, but you have to indicate the end of a 
paragraph with a special character, control-5. This 
displays as a tilde (~) on the screen, but does not show 
when the document is printed. Similarly, the end of a 
page must be indicated with a control-shift-5. These 
and other control codes are made easy to use by a 
sticker that defines them, attached to the keyboard 
just above the numbers row. 

WriteMaster’s performance is very good. Insertion 
and deletion are quick; the only thing that slows it 
down is disk access. I’m not sure how he did it, but 
every time Crosby used the print screen function in- 
stead of the print from file function, he got two copies 
of the screen on the printer. 


“Hello, Bill?” 
“Hi, Crosby, what’s up?” 


“Just wanted to give you a progress report on the 


HARD ISKS 


For 
Systems 
Integrators 


Whether you’re an OEM, system integrator, or end user, when the time comes 
to add a hard disk unit to your computer you wanta building block that offers 


high performance, quality, and cost effectiveness. The Pragmatic Designs 
PD-10M, PD-20M, and PD-40M all provide these features and more. 


All Pragmatic Designs hard disk sub-systems are designed for use in systems 
equipped with the CompuPro® Disk II hard disk controller. They can also be 
used with other OEM controllers which support the popular SA-4000 hard 
disk interface. Standard features include: 


10, 20, and 40 Megabyte formatted storage ® 19” rack mount configuration available 
11.7, 23.4, or 47.5 Megabyte unformatted storage » 1 Year limited warranty 

Fully compatible with CompuPro Disk Ilcontroller © Full hard disk system including controller, 
Heavy duty power supply with 110/220V capability cables, and software available 


Hard disks... easy solution. If you’re ready to add a full capability industrial 
grade hard disk sub-system to your computer system then call Jerry Hall at 
Pragmatic today. _ cS ,@ . 


Pragmatic Designs, Inc., 950 Benicia Ave., Sunnyvale, CA 94086 408/ 736-8670 TLX: 171627 


™ CompuPro is a registered trademark of Godbout Electronics 
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Cromemco C10 continued . 


computer. It’s pretty nice, and I haven’t wasted near- 
ly so much typing paper since I began using it. I 
wish, though, that it would let me type letters more 
than 23 lines long.” 


“Huh? What do you mean?” 


“Well, when you’ve got more than 23 lines, the bot- 
tom one pushes the top one off the screen and it 
doesn’t come out on the printer or anything, so you 
lose it.” 


“Umm, Crosby, it’s supposed to do that. The top line 
really doesn’t disappear, it’s still in the computer’s 
memory. The whole letter will come out when you 
tell it to print.” 


“Oh. Gotcha. Thanks. See you.” 


The documentation for the C10’s word processor is 
excellent (if you read it). It is well organized, with 
good examples, color illustrations, and is convenient 
in size. It demonstrates that a traditionally hard- 
ware-oriented company like Cromemco is ready to 
respond to the latest swings in the market and meet 
the marketing-oriented firms on their own ground. 
The manual is tutorial in orientation and is one of the 
package’s nicest features. 

There is nothing earth-shattering in the C10’s 
specifications: A 4 MHz Z80 with 64K, two serial 
ports and an integral monitor. The second serial port 
can be used as a link to another computer for upload- 
ing or downloading files, or to control a modem. 
There is a simple communications program that per- 
mits uploading and downloading of files and opera- 
tion as a remote terminal. The power switch is as in- 
conveniently located as any I have seen. Why can’t 
manufacturers just put them on the front? The mon- 
itor sports a green phosphor screen, but I found the 
character matrix to be a little coarse for my taste. 
The graphics mode, however, provided a very nice 
character fill and good definition. 

The C10 that Crosby and I tested came with the 
optional letter-quality printer, a Smith-Corona TP-1 
dressed up to match the C10. It is slow compared to 
the Diablo and NEC printers I am used to. The im- 
pression is clean, if somewhat light. Crosby thought 
the printer should have produced better carbon 
copies. 


“Hey Bill, I’ve got a problem.” 

“Really? What happened?” 

“The printer won’t work. I’ve tried everything, in- 
cluding your trick of turning everything off and back 


on again. And I need the memo that’s in there.” 


“Try looking behind the printer to see if the white 


The utilities are well developed, transcending many of 


wire from the computer is firmly plugged in.” 


“Okay, hold on a moment. Hey, the thing’s just sit- 
ting here on the table, not plugged into anything. 
Hang on while I try it. Ah, there it goes. Thanks, 
Bill.” 


The C10’s mechanicals are a little on the light side, 
an effect of keeping the manufacturing costs down, 
typical of the machines at the low end of the market. 
After Crosby got rolling, his main gripe with the C10 
was the keyboard enclosure. The molded plastic shell 
comes too close to the keys and binds a few of them. 
We disassembled the keyboard twice and tried to re- 
align it, to no avail. I took a file to it and the problem 
was solved. The video display unit, which also con- 
tains the processor, is attractively styled. Its clean, 
beige lines elicit compliments from everyone. My 
wife, who has seen computers come and go by the 
dozens, remarked, ‘“‘Now, that’s the least threaten- 
ing-looking computer I’ve ever seen.” And so it is. 
The keyboard has nothing more than you need to get 
the job done. It’s exactly what you’d find on a type- 
writer with the exception of a control key, four cursor 
keys and a couple of keys to complete the ASCII 
character set. No arcane function keys. There is an 
optional “‘ergonomic” stand available for the monitor 
unit. I’d recommend it to anyone, because it tilts and 
swivels and has a much smaller footprint than the 
monitor itself. There are threaded feet to adjust the 
angle of the keyboard and the display. 

The innards of the C10 are utterly uninspiring. All 
you can really see is the video board. The processor 
board is nestled beneath it, mostly out of sight. It 
contains a 4-MHz Z80, 64K of dynamic RAM, a 
couple of software-controllable UARTS, and not 
much else beside the disk controller. In keeping with 
the nontechnical nature of the machine, there is nary 
a mention of the insides in the documentation. 


“Bill?” 


the equivalent CP’M programs .. . the documentation 
for the C10’s word processor is excellent. 
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The Well-Tempered Cross-Assembler 


Before Johann Sebastian Bach developed 
a new method of tuning, you had to 
change instruments practically every time 
you wanted to change keys. Very difficult. 


Before Avocet introduced its family of 
cross-assemblers, developing micro-pro- 
cessor software was much the same. You 
needed a separate development system 
for practically every type of processor. 
Very difficult and very expensive. 


But with Avocet’s cross-assemblers, a 
single computer can develop software for 
virtually any microprocessor! Does that 
put us in a league with Bach? You decide 


Development Tools That Work 


Avocet cross-assemblers are fast, reliable 
and user-proven in over 3 years of actual 
use, Ask NASA, IBM, XEROX or the hun- 
dreds of other organizations that use them. 
Every time you see anew microprocessor- 
based product, there’s a good chance it 
was developed with Avocet cross- 
assemblers. 


Avocet cross-assemblers are easy to use. 
They run on any computer with CP/M"* 
and process assembly language for the 
most popular microprocessor families. 


XASMO8B .... 6805 
XASMO¢ .... 6809 
XASM18 .... 1802 


XASM48 .... 8048/8041 

XASM51 .... 8051 $200 
XASM65 .... 6502 each 
XASM68 .... 6800/01 

XASMF8 .... F8/3870 

XASMZ8 .... Z8 

XASM4O0.... COP400 

XASM75 .... NEC 7500 $500 


(Coming soon: XASM68K .... 68000) 


Turn Your Computer Into A 
Complete Development System 


Of course, there’s more. Avocet has the 
tools you need from start to finish to enter, 
assemble and test your software and finally 
cast it in EPROM: 


Text Editor VEDIT -- full-screen text edi- 
tor by CompuView. Makes source code 
entry a snap. Full-screen text editing, plus 
TECO-like macro facility for repetitive 
iasks. Pre-configured for over 40 terminals 
and personal computers as well as in user- 
configurable form. 


CP/M-80 version ............6.06008 $150 
CP/M-86 or MDOS version ....... $195 
(when ordered with any Avocet product) 


ROM Simulator -- ROMSIM by Inner Ac- 
cess eliminates need to erase and 
reprogram EPROM. Installed in an S-100 
host, ROMSIM substitutes RAM for 
EPROM in external target system. 16K 
memory can be configured to simulate the 
2708, 2758, 2716, 2516; :2732, 2532; 
2764, 2564 in either byte or word 
organization. Avocet’s configurable driver 
makes loading of HEX or COM files fast 
and easy. 


From $495 depending on cabling and 
RAM installed. 


EPROM Programmer -- Model 7128 
EPROM Programmer by GTek programs 
most EPROMS without the need for per- 
sonality modules. Self-contained power 
supply ... accepts ASCII commands and 
data from any computer through RS 232 
serial interface. Cross-assembler hex ob- 
ject files can be down-loaded directly. 
Commands include verify and read, as 
well as partial programming. 


CIRCLE 201 ON READER SERVICE CARD 


PROM types supported: 2508, 2758, 
2516, 2716, — 2532.* 2732. \Z732A, 
27C32, MCM8766, 2564, 2764, 27C64, 
27128, 8748, 8741, 8749, 8742, 8751, 
8755, plus Seeq and Xicor EEPROMS. 


(Upgrade kits will be available for new 
PROM types as they are introduced.) 


PROGrarmmeyy eeuiwtieeaw oi coearanacee ns $389 
Options include: 
Software Driver Package ......... $ 30 
RSi232 Cables dincctognvscsstorens $ 30 


8748 family socket adaptor ..... $ 98 
8751 family socket adaptor ..... $174 


Call Us 

If you're thinking about development sys- 
tems, call us for some straight talk. If we 
don’t have what you need, we’ll help you 
find out who does. If you like, we’ll even 
talk about Bach. 


VISA and Mastercard accepted. All popular disc formats now 
available -- please specify. Prices do not include shipping and 
handling -- call for exact quotes. OEM INQUIRIES INVITED 


* Trademark of Digital Research. 


AVOCET /(_ 
SYSTEMS INC. 


DEPT. 883-M 
804 SOUTH STATE STREET 


DOVER, DELAWARE 
302-734-0151 


19901 
TLX 467210 


Cromemco C10 continued . 


“Hi. What’s up?” 


“You're going to think this is silly, but I can’t get the 
chess game to work.” 


“What disk do you have in there?” 


“The work disk you made for me, the one I always 


use, 


“Well, that’s the problem. I removed everything but 
the word processor and a couple of utilities to make 
room for your memos.” 


“Oh. Well, how do I work the chess game?” 


“Put in one of the disks that has the Cromemco logo 
on the top.” 


“All right, bye.” 


When I removed from disk all the things Crosby 
wasn’t going to be using, I didn’t bother to revise the 
menu. You can, however; customize it to whatever 
you want. In this way, each disk that you put into the 
machine can be tailored to a specific application. 

I had initially expected the C10’s single disk drive 
to be a bottleneck, but it isn’t. The typical C10 user 
will not be doing a lot of disk-to-disk copying. The 
dual-sided 40-track drive yields 360K of storage, fine 
for most applications. There are provisions for single- 


Type EPROM’s 


Now You Can Afford Another 64K... 


drive copying of individual files and entire disks. It’s 
a bit slow, having to swap the disk every minute or so, 
but not impossible. You can add a second drive, 
which daisy-chains onto the modular cable that plugs 
into the rear of the monitor/computer. 

Speaking of that chess game, the C10 has charac- 
ter-based graphics. The shapes available go beyond 
the usual line-drawing set into a group obviously in- 
tended for games. The chess characters look as good 
as any I’ve seen, and the game itself is challenging 
and fast. 

The spreadsheet program, PlanMaster, is typical 
of the genre. You set up the usual grid and fill it with 
numbers and cell calculations. I found its disk access 
to be a little slow, but the actual calculations were 
agreeably quick. A group of Basic programs, called 
MoneyMaster, perform a variety of useful home and 
light business financial calculations. These include 
loan and mortgage amortization and stock and bond 
analysis. Most home computerists get programs like 
these by buying a book and keying them in. Their 
inclusion here is thoughtful. 

The C10 also comes with Cromemco’s Structured 
Basic, a highly evolved Basic interpreter. It was once 
a contender for the “‘best Basic’ contest, but Crom- 
emco’s reluctance to move it outside the CDOS envi- 
ronment limited its acceptance. As the name implies 
it provides control structures similar to Pascal or 
PL/I. Your code can be quite elegant. You would 
expect an interpreter like this to be slow, given the 
advanced control structures it offers. The design, 


Especially when it’s less than 


a half cent per bit! 
Specifications: 
@ Fully Static Operation ® All Data, Status and Address Lines 
@ Supports S-100 IEEE—696 Standards Fully Buffered 
@ Uses Popular 2716 Pinout Type © Gold Plated Contact Fingers for Low COEX 64K S-100 CMOS 
Static RAM’s Contact Resistance and Long Life 
© Board Access Time Under 200nS @ Switch Selectable Extended Address STATIC RAM BOARD 
@ 150nS RAMS Standard Lines For Up To 16 M-bytes 
@ No Wait States Needed at 6.000MHz © Extreme Low Power Dissapation $ 00 
6 eK rae penne mS (<500mA Typical 
6 sia = Ra eee saturn @ Top 8K May Be Switched Disabled only 
@ Switch Selectable Phantom Line and/or Interchangeable with 2716 Assembled & Tested 


“Have You Kissed Your Computer Lately” 


Components Express, Inc. 


1380 E. Edinger @ Santa Ana, Calif. 92705 @ 714/558-3972 
Terms of Sale: Cash, Checks, Credit Cards, M.O.,C.O.D. Calif. residents add 6% sales tax. 
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mastet charge 


Super Prices - Quick Delivery 


MINIMUM SHIPPING $3.00 - NO SURCHARGE ON VISA/MASTERCHARGE 


1-800-545-2633 - Continental U.S. 


DISK DRIVES 


SHUGART 
5%" SA400 (35) 
5¥%4" SA400L (40) 
5%" SA410L (40) 
5%" SA455L (40) 
8” SA801R (SS/DD) 


MITSUBISHI 
5%" M-4851 2 size 
DS/DD 40Tr 
5%" M-4853 ¥2 size 
96 TP! same as TM100-4 
5%" M-4854 ¥2 size 


SHUGART 800/801R 
RECONDITIONED 
90 Day Warranty 


TANDON 
5%" TM100-1 SS/DD .... 
5%" TM100-2 (IBM) 


195.00 


DISK DRIVE CABINETS 


For 2 or 4-8” thinline drives 


PERTEC 
5%” FD200-S 
SS/DD 40TR 
5%” FD250-5 DS/DD 


*NOTE - Power supply will accommodate hard disk 
8” *DDC88V28 w/PS vertical - for 2-8” drives ... 
8” DDC88T-1 w/PS vertical - 


. 300.00 


8” DDC88T-2 w/PS vertical - inexpensive version for 
2-8” thinline drives 


8” *DDC8V w/PS vertical - for 1-8” drive 


1.5 MG w/8” electronics formats 
same as IBM 1 & 2D 8" std 
8” M-2894-63 
Std 8” DS/DD 1.2 MG 


8” *DDC88H w/PS horizontal - for 2-8” drives .... 
5%” DDC5H w/PS horizontal - for 1-5%” drive ... 
5%” DDC55H w/PS vertical - for 2-5%” drives ... 


5%" B-51 40TR SS/DD.. . 230.00 


5%” B-52 (IBM) 80TR 


MONITORS/TERMINALS PRINTERS 


Sanyo 2112 (15 MHZ) 
BMC 12A (15MHZ) 12” Grn 
BMC 9191 color 12" ... 
Amdek Color II 

USI 9" Grn (20 MHZ) .. . 
USI 12” Grn (20 MHZ) . . 
USI 12" Amber (20 MHZ) . 
Televideo 910 

Televideo 925 

Televideo 950 

Televideo 970................-- F 


All diskettes have 1 yr. min. to lifetime warranty. 
“Thinline II" - ¥2 size 163K 40TR Prices are for package of 10. Call for qty. pricing. 
TEAC “Thinline” - ¥2 size 163K 40TR .. . 275. 5%" Sql side/sgl den 
Micro-SCI . 5%" Sgl side/dbl den 
Controller .... x 5¥4" DbI side/dbi den 
Rana Elite | . 5%" 
Rana Elite I! . 5%" ‘ 
Rana Elite Il! 2: Sol side/abl den 
8" Dbl side/dbl den 


Pro-Writer | (8510A) 120 CPS 
Star-Writer F 10 (Ltr quality) 
STAR MICRO-TRONICS 
Gemini 10 (100 CPS) 80 Col . 
Gemini 15 (100 CPS) 132 Col 
OKI-DATA 
82A Par + Ser 80 Col 
83A Par + Ser 132 Col 
34B Ber 200 CPS 132 Col 
92A 160 CPS - Par 80 Col 
93A 160 CPS - Par 132 Col 
NEC 
NEC 8023 A 


AC SURGE ELIMINATCRS 


Lemon (6AC outlets - 3 prong) 4600 
Lime (5° - 3 prong pwr cord w/on-off switch 69.00 
Orange - AC surge + EM! filter (6 outlets) 119.00 
Plum - EMI-PF filter 39. 


TOSHIBA 
TMS2716(5+12V) $3.960e. P-1350 Ltr quality - 120 CPS 

TMS2732 $4.95 00. Oratt mode 192 CPS Par or Serial 
TMS4164(200NS) 5.95 ea. P-350 (100 CPS) Centronics Par-15" 
TMS6116-4(200NS) $4.75 ea. MPI 
MPI 99G (9") 

MPI 150A1 (15") 


TMS2532 96. 
2716 (5V) .... $3. 


DATA CABLES EPSON 


MX80 w/Graphtrax 
SOLDER TYPE MB80FT w/Graphtrax 


8" DSC 88-2SKT - for 2-8" drvs w/skt.conn. 16.95 pe2sp 2.50 FXx80 


QUV-T8/1 (hobby) 


5%" DSC55-2SKT - for 1-5¥%" drvsw/sktconn. $15 ff QUV-T8/2 (industrial version) 5 DB25S ¥ MXx100 
RS232MM-5' (male to male) QUV-T8/2 (w/timer & safety switch) DB25 Hood f MX100FX 
S-100 Connectors ... 
GIGANTIC REDUCTIONS 
IN PRICE! 


CARD CAGES/MOTHER BOARDS MAINFRAMES COMPUPRO 


S-100 - all assembled and tested 

*IEEE - 696 - No termination required 
Slots Bare Bd A+T 

15.00 40.00 


For 2 Standard 8” Drives 
MF+DD6 (6 slot M/B) 
MF+DD8 (8 slot M/B) 
MF+DD12 (12 slot M/B) 


For 2 Thinline 8” Drives 
IMF +DD6C (Cadillac version) 
IMF +DD6F (Ford version) 


For 2 - 5%” Disk Drives 

MF+MD12 (12 slot M/B) 
Standard Plain Front 

MF + 12 (12 slot M/B) 
MF +22 (22 slot M/B) 
All mainframes except IMF + DD6F have EMI filter, 2 AC 
outlets, 15 ea. DB25, 2 ea. 50 pin, 2 ea. 34 pin, 1 ea. 
Centronic cutouts, power supply for 8” MF 
(—5V1A/+5V6A/+8V16A/+ 16V3A/+24V6A) 


ram 
SDS-ZSI0/4 - 4 serial port 1/0 a 

‘SDS-MUX - RS232 

‘SOS-HDI-M - Hard diek Teor micropcls . 
SDS-CPM/B105~cp/m for SBC100 w/BIOS: 
‘SOS-Turbodos - Multi-user tor master & slaves 


w/card cage 
60.00 


Sees Support! .... 
Interfacer 4 

Active Teammates .. . 
Enclosure 2 (disk) 


Call for others 


20.00 48.00 70.00 


BOARD SETS 


Best Bare Board Set Available 
QTC-SBC 2/4 CPU 
QTC-EXP + Ill 256K Memory bd. 
QTC-FDC 5/8 Floppy disk controller 


25.00 69.00 100.00 


30.00 99.00 140.00 CPU /MEM/1/O 


1) Includes manuals & assembly instruct 
2) Parts available 3) Monitor & B10S rvalabie Add $30.00 


QT CLOCK/CALENDAR 


QTC-SBC 2/4BB8 1 ser 1 par 
OQTC-SBC2/4A A+T 
QTC-Z+80BB 1 serial 


45.00 150.00 200.00 


Toletek FOC-1 A+T 
60.00 185.00 Toletok Systemasier AT 
$-100 oF Appie ® Time in hrs, min, sec. © AM/PM or Military 
Format # Date in Mo...Day. Yr, Day of Week & Leap Year 
recognition # 4 hard interrupts (1024 Hz, THz, 1 min, 1 he) 
# On board battery (will last 14 mos. w/ne power on) 
QTC-CCS-BB (S-100) $45.00 
QTC-CCS-K (kit for S-100 $100.00 Erbin 
QTC-CCS-A(A+T) for S-100 $125.00 CTEAGK: a es 
QTC-CCA-BB (tor Apple) $33.00 Coneny 
GTCCOAA tor Apson as OTE-Dual GPIO-488 IEEE 408 riertace bd A= SaTB Oe 


eae Mail Orders ies 


OQTC-EXP + Ill Bare Gd. (dynamic) 
y OTC-EXP +l 64K A+T (64K: 
All card cages will accommodate a 4” fan pez 1 MES. 


Add $20.00 for 1 fan - Add $30.00 for 2 fans 


Retail Sales 
123 East 200 South The Great Salt Lake P.O. Box 3150 
Sait Lake City, Utah 84111 earl dad Salt Lake City, Utah 84110 


1-801-363-3314 
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SOFTWARE DESCRIPTIONS 


TPM (TPM I) - $80 A 280 only operating system which is 
capable of running CP/M programs. Includes many features not 
found in CP/M such as independent disk directory partitioning for 
up to 255 user partitions, space, time and version commands, date 
and time, create FCB, chain program, direct disk !/0, abbreviated 
commands and more! Available for North Star (either single or 
double density), TRS—80 Model | (offset 4200H) or Il, Versafloppy 
|, or Tarbell |. 

TPM-II -$125 An expanded version of TPM whichis fully CP/M 
2.2 compatible but still retains the extra features our customers 
have come to depend on. This version is super FAST. Extended 
density capability allows over 600K per side on an 8" disk. Availa- 
ble preconfigured for Versafloppy Il (8” or 5”), Epson QX-10, 
Osborne Il or TRS-80 Model Il. 


CONFIGURATOR | 
This package provides all the necessary programs for 
customizing TPM for a floppy controller which we do 
Not support. We suggest ordering this on single den- 
sity (8SD). 

Includes: TPM-lI ($125). Sample PIOS (BIOS) SOURCE 
(SFREE), MACRO II ($100). LINKER ($80). DEBUG | ($80) 
QED ($150), ZEDIT ($50). TOP | ($80). BASIC | ($50) and 


BASIC II ($100) 
$815 Value NOW $250 


CONFIGURATOR II 
Includes: TPM-II ($125). Sample PIOS (BIOS) SOURCE 
(SFREE). MACRO II ($100). MACRO II! ($150). LINKER 
($80), DEBUG | ($80), DEBUG I! ($100). QSAL ($200). QED 
($150), ZTEL ($80). TOP I ($100). BUSINESS BASIC 
($200) and MODEM SOURCE (S40) and DISASSEMBLER 
($80) 
$1485 Value NOW $400 
MODEL | PROGRAMMER 
This package is only for the TRS-80 Model |. Note: 
These are the ONLY CDL programs available for the 
Model |. It includes: TPM | ($80). BUSINESS BASIC 
($200), MACRO | ($80), DEBUG | ($80). ZODT ($40). ZTEL 
($80), TOP | ($80) and MODEM ($40) 

$680 Value NOW $175 


MODEL Il PROGRAMMER 
This package is only for the TRS-80 Model II 
It includes: TPM-II ($125), BUSINESS BASIC (S200). 
MACRO II ($100). MACRO III ($150). LINKER (S80). 
DEBUG | ($80), DEBUG II ($100). QED ($150). ZTEL ($80). 
TOP II ($100). ZDDT ($40). ZAPPLE SOURCE (S80) 
MODEM ($40). MODEM SOURCE (S40) and DISAS- 


SEMBLER ($80) NOW $375 


$1445 Value 
BASIC I - $50. a 12K+ basic interpreter with 7 digit precision 
BASIC II - $100. A 12 digit precision version of Basic | 


BUSINESS BASIC - $200. A full disk extended basic with 
random or sequential disk file handling and 12 digit precision 
(even for TRIG functions). Also includes PRIVACY command to 
protect source code. fixed and variable record lengths, simultane- 
ous access to multiple disk files. global editing, and more! 


ACCOUNTING PACKAGE - $300. Written in Business 
Basic. Includes General Ledger. Accounts Receivable/Payable 
and Payroll. Set up for Hazeltine 1500 terminal. Minor modifica- 
tions needed for other terminals. Provided in unprotected source 
form. 


MACRO | - $80. A 80/8080 assembler which uses CDL/TDL 
mnemonics. Handles MACROs and generates relocateable code 
Includes 14 conditionals. 16 listing controls. 54 pseudo-ops. 11 
arithmetic /logical ops. local and global symbols. linkable module 
generation, and more! 


MACRO II - $100. An improved version of Macro | with 
expanded linking capabilities and more listing options. Also inter- 
nal code has been greatly improved for faster more reliable 
operation. 


MACRO III -s150, Anenchanced version of Macro ll. Internal 
buffers have been increased to achieve a significant improvement 
in speed of assembly. Additional features include line numbers. 
cross reference. compressed PRN files. form feeds. page parity. 
additional pseudo-ops. internal setting of time and date. and 
expanded assembly-time data entry. 


QSAL 


Software 


TPM |: 


TPM-Il: 


DEVELOPER | 
Includes: MACRO | ($80). DEBUG | ($80). ZEDIT (S50) 
TOP | ($80). BASIC | ($50) and BASIC 1! ($100) 

$440 Value NOW 


DEVELOPER II 
Includes: MACRO II ($100), MACRO II! ($150), LINKER 
($80), DEBUG | ($80), DEBUG |! ($100), BUSINESS BASIC 
($200), QED ($150), TOP II ($100), ZDDT ($40), ZAPPLE 
SOURCE ($80), MODEM SOURCE ($40), ZTEL ($80), and 


DISASSEMBLER ($80). 
$1280 Value NOW $350 


DEVELOPER III 
Includes: QSAL ($200). QED ($150), BUSINESS BASIC 


($200), ZTEL ($80) and TOP I! ($100) 
$730 Value 


COMBO 
Includes: DEVELOPER Ii ($1280). ACCOUNTING PACK- 
AGE ($300). QSAL ($200) and 6502X ($150) 

NOW $500 


LINKER - $80. A linking loader for handling the linkable 
modules created by the above assemblers 


DEBUG | - $80. A too! for debugging 280 or 8080 code 
Disassembles to CDL/TDL mnemonics compatible with above 
assemblers. Traces code even through ROM. Commands include 
Calculate. Display. Examine. Fill. Goto, List. Mode, Open File, Put. 
Set Wait. Trace. and Search 


DEBUG II - $100. A superset of Debug |. Adds Instruction 
Interpreter. Radix change. Set Trap/Conditional display. Trace 
options. and Zap FCB 


6502X - $150. A 6502 cross assembler. Runs on the Z80 but 
assembles 6502 instructions into 6502 object code! Similar features 
as our Macro assemblers 


QSAL - $200. A SUPER FAST 280 assembler. Up to 10 times 
faster than conventional assemblers. Directly generates code into 
memory in one pass but also to offset for execution in its own 
memory space. Pascal like structures: repeat...until, if..then...else. 
while...do. begin..end. case...of. Multiple statements per line. 
special register handling expressions. long symbol names, auto 
and modular assembly, and more! This one uses ZILOG Mnemonics. 


QED - $150. A screen editor which is both FAST and easy to 

learn. Commands include block delete. copy. and move to a 

named file or within text. repeat previous command. change. 

locate. find at start of line, and numerous cursor and window 

movement functions. Works with any CRT having clear screen, 

— cursor, clear to end of line, clear to end of screen, and 
4, 


NOW $300 


$1930 Value 


DISK FORMATS 


When ordering software specify which disk format you would like 


CODE DESCRIPTION 


8SD 8” IBM 3740 Single Density (128 bytes/26 sectors/77 tracks) 
8DD 8" Double Density (256 bytes/26 sectors/77 tracks) 
8XD 8” CDL Extended Density (1024 bytes/8 sectur/77 traceks 


5SD 5.25" Single Density (TRS80 Model |. Versafloppy |. Tarbell |) 


5EP 5.25" Epson Double Density 

5PC 5.25" IBM PC Double Density 

5XE 5.25" Xerox 820 Single Density 

50S 5.25" Osborne Single Density 

5ZA 5.25" 280 Apple (Softcard compatible) 


ZTEL - $80. An extensive text editing language and editor 
modelled after DEC's TECO. 


ZEDIT - $50, A mini text editor. Character/line oriented. Works 
well with hardcopy terminals and is easy to use. Includes macro 
command capability 


TOP | - $80. A Text Output Processor for formatting manuals, 
documents, etc. Interprets commands which are entered into the 
text by an editor. Commands include justify. page number, head- 
ing. subheading. centering, and more 


TOP II - $100. A superset of TOP |. Adds: embedded control 
characters in the file. page at a time printing. selected portion 
printing. include/merge files. form feed/CRLF option for paging, 
instant start up. and final page ejection 


ZDDT - S40. This is the disk version of our famous Zapple 
monitor. It will also load hex and relocatable files. 


ZAPPLE SOURCE - $80. This is the source to the SMB 
ROM version of our famous Zapple monitor. It can be used to 
create your own custom version or as an example of the features 
of our assemblers. Must be assembled using one of our assemblers. 


MODEM -Acommunication program for file transfer between 
systems or using a system as a terminal, Based on the user group 
version but modified to work with our SMB board or TRS-80 
Models | or Il. You must Specify which version you want 
MODEM SOURCE - S40. For making your own custom 
version. Requires one of our Macro Assemblers. 


DISASSEMBLER - s80. Does bulk disassembly of object 
files creating source files which can be assembled by one of our 


assemblers 
HARDWARE 


S-100 — SMB II Bare Board $50, “System Monitor Board” for 
S-100 systems. 2 serial ports, 2 parallel ports, cassette inter- 
face. 4K memory (ROM, 2708 EPROM, 2114 RAM), and power 
on jump. When used with Zapple ROM below. it makes putting 
a S-100 system together a snap. 

Zapple ROM $35, Properly initializes SMB 1/Il hardware, pro- 
vides a powerful debug monitor 

IBM PC — Big Blue 280 board $595, Add 280 capability to your 
IBM Personal Computer. Runs CP/M programs but does not 
require CP/M or TPM. Complete with Z80 CPU, 64K add on 
memory. serial port. parallel port, time and date clock with 
battery backup. hard disk interface, and software to attach to 
PC DOS and transfer programs. Mfr'd by QCS. 

50% Discount on all CDL software ordered at the same time as 
a Big Blue (and for the Big Blue). 

APPLE 1! — Chairman 280 $345, Add Z80 capability to your 
Apple Il/Il Plus computer. Runs CP/M programs with our 
more powerful TPM. Includes 64K memory add on (unlike the 
competition this is also useable by the 6502/DOS as well as 
the Z80), TPM. QSAL assembler, QED Screen Editor. and Busi- 
ness Basic. Mfr'd by AMT Research 
Apple Special $175. Buy the Apple 280 Developer at the same 
time as the “Chairman” and pay only $175 instead of $325. 


APPLE Z80 DEVELOPER 
Includes: 6502X ($150), MACRO I! ($100), MACRO III 
($150), QSAL ($200), QED ($150), LINKER ($80), DEBUG! 
($80), DEBUG 1! ($100). ZDDT ($40) and BUSINESS 


BASIC ($200) 
VALUE: $1250 NOW $325 


$175 when purchased with AMT “Chairman” Board 


ORDERING INFORMATION: 
VISA/MasterCard/C.0.D. 
Call or Write With Ordering 


Information... 
616K 
’ OEMS: 
Many CDL products are ‘ayellable for 
licensing to OEM's. Write to Carl 
Galletti with your requirements. 


Dealer Inquiries Invited. 


TPM INFO When ordering TPM | or Il, in addition to Disk Format. please specify one of the following codes: 


CODE DESCRIPTION 
NSSD/H = North Star Single Density for Horizon 1/0 
NSSD/Z North Star Single Density for Zapple 1/0 


NSOD/H = North Star Double Density for Horizon 1/0 
NSDD/Z North Star Double Density for Zapple 1/0 
TRS80-| TRS-80 Model | (4200H Offset) 

TRS80I|_ TRS-80 Model |! 

vis Versafloppy | 8" 

Vi5 Versafloppy | 5.25" 


V8 Versafloppy !I 8" (XD) 
VII5 Versafloppy Il 5.25" 
TRS80I1_ —TRS-80 Model II (XD) 


Prices and Specifications subject to change without notice. 
TPM. 280. CP/M. TRS80 are trademarks of CDL. Zilog. DRI and Tandy respectively. 


For Phone Orders ONLY Call Toll Free... 
(Except Pa.) 


1-(800) 458-3491 


Ask For Extension #15 


For information and Tech Queries call 
(609) 599-2146 


Computer Design Labs‘ = 


342 Columbus Avenue/Trenton, NJ 08629 = 


CIRCLE 84 ON READER SERVICE CARD 


The AW TIVIN Solution 
For Expanding Businesses... 
From single-user workstations to 
multiuser Systems & Networks, 
our DISCOVERY MULTIPROCESSOR is 


designed to grow by leaps and bounds. 
No more obsolete hardware or software. 


a \. As your business 


Cromemco C10 continued... 


however is that of a semicompiler or incremental 
compiler. Line references are stored in internal tables 
and expressions are tokenized, improving execution 
speed. It has a strong following in the Cromemco 
community, though, and it’s inconceivable that they 
would have introduced this machine without it. If you 
are a Structured Basic fan, you are nodding and smil- 
ing, glad of Cromemco’s strategy of giving it away on 
a low-end machine. If you have never used it you are 
probably wondering what all the fuss is about. 

In the course of the review, Cromemco sent a new 
set of disks to all C10 owners. They contained im- 
provements to just about everything on the system: 
CDOS, the word processor, and some of the utilities. 
Such action on the part of system manufacturers is 
commendable and all too rare. 


expands... 
DISCOVERY 


expands 
with you! 


“Hey, Crosby, how’s the machine treating you?” 


‘Tm saving so much money on White-out that I 
think I can afford a new car. Really, though, it’s a 
timesaver. Now if I could just learn to move para- 
graphs around. . . . Is that in the manual?” 


For further information on the C10, contact: 


Cromemco 
280 Bernardo Ave. 
P.O. Box 7400 

Mt. View, CA 94039 
(415) 964-7400 


Q/C Version 3 


We ain’t messing around! 


With Version 3, we've added structures, unions, and multidimen- 
sional arrays. Yes, we still provide the complete source code for 
the entire package. No, we didn't raise the price. For only $95 you 
get a professional, full-supported C compiler for CP/M that is ready 
to run, plus a// of the source code. Q/C supports a large subset of 
C, and is upward compatible with the UNIX Version 7 C compiler 
from Bell Labs. The Q/C library includes over 50 input/output and 
other support functions, all written in C. Q/C features include: 


® Complete source code for compiler and i/o library 
© No license fees on object code 

© 8080 and Z80 (with Zilog mnemonics) versions available 
¢ Produces ROMable code 

e An easy-to-read 136 page User's Manual 

e Excellent support for assembly language 


The tone of our User’s Manual is informal and personal. Jim 
Colvin (the author of Q/C) tells you how to use the compiler, and 
clearly describes each library function. There's even a chapter that 
explains details of the “internals” of Q/C. 

We continue to develop and enhance Q/C, and provide up- 
dates at a reasonable cost. Write or call for details of Q/C Version 3. 
Disk formats include 8-in. single density, KayPro, Osborne DD, 
Morrow, Televideo 802, and Apple CP/M. 


C—O 
5266 Hollister 
WORKS Senco" 


Q/C, CP/M. Z80, and UNIX are trademarks of Quality Computer Systems. Digital Re- 
search, Zilog. Inc.. and Bell laboratories respectively. 


ON! Call us NOW...at (213) 351-5451 


Action Computer Enterprise, Inc. 
430 N. Halstead St., Pasadena, CA91107 USA 
TWX 910-588-1201 ACTION PSD 0 (213) 351-5451 


In Europe: A.C.E. (Europe) Eindhoven, Netherlands TELEX 51767 ACE E NL Tel. 040-452658 
In Canada: CESCO Electronique LTEE O Montreal, Canada O (514) 735-5511 
In Asia: Action Computer Enterprise (Asia) Hong Kong TWX 75332 PACIC HX Tel. 5-441692 


CIRCLE 64 ON READER SERVICE CARD CIRCLE 197 ON READER SERVICE CARD 
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31966B 
CD6981 


CDE282 
C39008 


C21B01 


21004 
228583 
coccé1 
CDD391 
111863 
CDE202 
CDE961 


Use: 


XERA - AN EXTENDED ERASE UTILITY E.5? CP/M 
Copyright: Tan Ashdown 


byHeart Software 
2 - 2016 West lst Avenue 
Vancouver, B.C. V4J 1G8 
August 13th, 1982 


Version: 1.1 


Same as CP/M's "ERA" built-in command, except 
that. "XERA" queries the operator whether each 
file found using wild-card characters such as 
"2" and "*" are to be erased or not. It 
performs a function similar to MP/M's "ERAQ" 
command. 


As an added convenience, "XERA" asks the operator 
if it is 0.K. to erase the indicated files before 
actually doing so. Typing anything other than "Y" 
or "y" In response or typing “C anytime prior to 
this question will terminate the routine without 
erasing any files. 


"System" and aRead-Cnlye files are displayed but 

not erased. Normally, the "System" and "Read-Only" 
file attributes have been asSigned for a good | 
reason, and thus these files should not bé easil 
erasable along with the "Directory" and "Read-Write" 
files. In order to erase them it 1s necessary to 
either use CP/M's bui]t-in command "ERA" or else 
set the files attributes to "DIR" and "R/W" using 
CP/M's “STAT" utility and then rerun "XERA". 


Example: A> XERA PRO*.??? 
A: PROG «TXT ? <Y Yes 
A: PROG ~COM READ/ONLY and SYSTEM 
A: PROG -ASM ? <N>_No 
A: PROG O81 READ/ONLY 
A: PROGRESS.BAS ? <Y> Yes 
A: PROGRESS. INT ? <YD Yes 
O.K. to erase? <Y Yes 
; *** DEFINITIONS *** 
Boor EQU O9G0H ;Warm start vector 
BDOS 1U 6095H 7;FDOS entry vector 
CONOUT EQU 92H 7BDOS console output function | 
DIRCIO HOU 06H ;B8DOS direct console I/O, function 
PSTRNG EQU 99H ;BDOS print etelng Lunction : 
SRCHF EQU 11H ;BDOS search for first function 
SRCHN EQU 12H ;BDOS search for next function 
DELF EQU 13H ;BDOS delete file function F 
DSKNO  EQU 19H ;BDOS return current disk function 
BELL EQU O7H ;ASCIT bell 
EQU HAH zASCII line feed 
CR EOQU 9DH ;ASCII carriage return 
FNCNT = EQU OFH ;File name, character count 
DFCB U @685CH yDefault file control block address 
DFDMA EQU 9086H ;Default DMA address 
° *** MAIN PROGRAM *** 
XERA ORG #100H _ ;Start of main program 
LXI SP ,STACK;Set stack pointer to local stack 
CALL INIT ;Initialize variables 
CALL SETPTRS ;Set file name buffer & erase vector pointers 
CALL SFIRST ;Search for first file match 
CALL QEEND ;Check to see if a file match was found 
JNZ 'FND zJump to FFND if a file match was found 
LXT D,NFMSG ;Print "NO FILE" if no file match 
CALL = PRINT 
JMP BOOT ;Return to CP/M 
FEND CALL MOVNAME ;Move current file name to file name buffer 
CALL INCBUFF ;Increment file name buffer pointer 
CALL SNEXT Search for next file match 
CALL FFND ;Check to see if a file match was found 
NZ 'FND ;Loop to FFND if a file was found 
LXI H,NAME ;Reset file name buffer pointer 
SHLD BUFF 
CALL SAVECNT ;Save copy of directory file count 
CALL QDSK ;Determine name of specified disk 
LXI D,CRLF ;Print carriage return & line feed 
CALL PRINT $ . 
NEXTFN CALL TFATT ;Test file attributes (R/O and SYS check) 
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7Print current file name 228583 SHLD BUFF ;Store new value 
7Print file attributes if R/O and/or SYS ~ (a) RET 
;1£ DIR and R/W-ask if file to be erased 
yIncrement erase vector pointer SAVE COPY OF DIRECTORY FILE COUNT 
zIncrement file name buffer pointer. e - 
;Decrement directory file count register I LDA - DFCNT  ;Get number of directory files 5 
a a STA DFCNT] ;Store in aux. directory file count register 
;Loop to NEXTFN if more files co RET 


;Test query flag _to see if any files z DETERMINE NAME OF SPECIFIED DISK 

jare to be erased é 

7Return to CP/M if no files to be erased | DFCB 7Get disk number from default FCB. : 

;Reset file name buffer &.erase wectou pointers FEQQ @ 71£ none specified then get current disk number 
CD9BG2 QOK 7Ask if- indicated files should be eras CURRENT 4 

DCBFG2 cc zErase indicated files if O.K. C648 ;Convert number to ASCII disk name 

C3800 ;Return to CP/M Fe or ;7Store it in DSK 


‘**k* SUBROUTINES *** 
INITIALIZE VARIABLES 


ABQASIVIS Voe2zeseao 

eS SESE eRe rere 

DADO OSS Sb .Bw 

DWSUPOUW NOR MMOD 
Le 


;Get current disk number 


;Clear directory file count register 


iClear query fla z TEST FILE ATTRIBUTES FOR "READ-ONLY" AND "SYSTEM" 
;Clear erase vector i 
BUFF 7Set HL to point to current. file name 
D, zAdd 9-byte offset to point to R/O file 
D jattribute byte A 
A,M 7Get R/O file attribute byte 
86H . $Mask off R/O attribute bit ; 
;Save result as bit 1 of file attribute byte 
MOV B,A ;Store it temporarily in register B 
FILE NAME BUFFER: AND ERASE VECTOR POINTERS Hu zIncrement pointer to SYSTEM attribute byte 
H.NAME -Stu aa en akarbuosi til buff AM ;Get SYS file attribute byte 
PeLOr e Qg0 Re Se JOT SCARCE QE eo)e: Dene cuLter 80H ;Mask off SYS attribute bit 
BUEF yin pointer BUFF ;Save result as bit 2 of file attribute byte 
H,ERASE ;Store address of start of erase vector in poeve x: uf es IDLE 2 py 
EVCTR - ;pointer EVCTR B ;Add bit 1 from register B_ , 
FATT ;Store result in file attribute register 


SEARCH FOR FIRST FILE PRINT FILE NAME 


LXI D,DFCB_ ;Search for first file match *Pri i 
MVI C;SRCHF 2h ;Print disk name 
CALL BOS 

RET 


DOS 
SEARCH FOR NEXT FILE wes sore sPrint=" 2" 


115c8A LXI D,DFCB_ ;Search for next file match BUFF 
GE12 MVI C,SRCHN 


23 H 
CDA58e CALL BDOS MVI B,8 ;Set counter to number of file name characters 
co RET ES ;Save pointer and counter 


7Set HL.to point to start of file name buffer 
;Set pointer to first.file name character 


DETERMINE IF FILE FOUND 


CPI OFFH ;Did search operation return -1 in ACC? 

RZ 7If ACC = -1 (file not found) then return 

Re H DENT 7Increment directory file counter (file found) 
RET 


7Get file name character 
iStrip off top bit (if any) 
7Print ASCII character 


OnE wR 
Q>es 


;Recall counter and pointer 


st 
A 


;Increment pointer 
;Decrement character counter 


MOVE FILE NAME FROM DEFAULT DMA ADDRESS TO FILE NAME BUFFER 5 
C21582 ;Loop to NEXTN2 if more file name characters 


BUFF ;Set file name buffer pointer in DE 
E5 


7Set default DMA address file name ptr in HL 1E2E 
7(Search functions return four FCB'S in 128- 

byte default buffer, with returned value 

zin_A indicating which is the correct FCB. 

;Multiplying A 32 and adding the result 

;to HL makeS HL point to the-correct FCB.) 


: 


7Saye pointer 
;Print *.' 


: 


~ 


os 
g 


;Recall pointer 


we 


;Set counter to number of file type characters 
;Save pointer and counter 


CoS rr rra 


33 


jGet specified disk number from DFCB 
;Store it in current file control block 
Set file name character counter 

7Move file name characters 


#Get file type character 
;Strip off top bit (if: any) 
;Print ASCII character 


QMANrume mmDOmMT Zw 
Sa>as 

z 

Fo} 

5 


;Recall counter and pointer 


ouUtoruUs 


7Increment pointer 
;Decrement character counter 
EXTT2 ;Loop to NEXTT2 if more file type characters 


ee Print ' ‘ 


5 
C23202 


; INCREMENT FILE NAME POINTER 1E26 
GEB2 
INCBUFF BUFF ;Get current value of file name buffer pointer CppS00 
Bayes ;Increment by 15 bytes co 
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PRINT FILE ATTRIBUTES IF "READ/ONLY" AND/OR "SYSTEM" 


3A8CO3 FATT 7Get file attribute register contents 
4aF MO crn ;Store te as a 16-bit value in BC 
H,ATTMSG ;Set HL to point to base of msg. ptr. table 

Add a ropriate message pointer offset as 
zindicated by file Bets Ete red iStar contents 
Move address of message indicated by pointer 
;to DE 
;Print the appropriate message (will print 
7one of RDWR, RODN, SYST or ort : 
7Get file attribute register contents 
7Test for R/W and DIR file attributes 
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TO BE ERASED 


z;Print ">? " 
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;Get operator's response 
;Return to CP/M if “C 


;Jump to SETERA if it is "Y" or "“y“ 


jdnizejut oz jo Aue moje spreog utd z eu, 
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;Print "No" 


;Set Erase File flag in erase vector 


7Set ery flag OFLAG to indicate that there 
jare ites to Be erased 
7Print "Yes" 


UMIWIPED [9x9IN 
yun syod jarrezed 


dn syoeq Arayeg 
TeuONdaIp-1q 11g g - Z 


INCREMENT ERASE VECTOR POINTER 


;Get current value of erase vector pointer 
;Increment it 
Store new value 
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ASK IF INDICATED FILES SHOULD BE ERASED 
OKERA ;Print "0.K. to erase?" 
INT 


7Get opsratores response 
Jump to ERAYES if it is "Y" or "y" 
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;Print "No — FILES NOT ERASED" 


eeevevee LaOnuID 
e eevee cecse se elojoauUos algueduico souomueg 


auyvod NOILdO 


S9IBO 


;Set Carry Status to @ as "NOT ERASED" flag 
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117783 ;Print "Yes" 
CDE262 
3 ;Set Carry Status to 1 as "ERASED" flag 


SOINOULNAD 


FILES 


;Set counter to number of directory files 
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;Is Erase File flag in erase vector set? 


;Jump to_NOERA if not set 
7Save file counter 
;Delete file 
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7Recall counter . 
jIncrement erase vector pointer 
INCBUFF ;Increment file name buffer pointer 
B ;Decrement file counter __ 
NEXTFC ;Loop to NEXTFC if more files 
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PRINT STRING ROUTINE 
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XERA continued .. . EASI STRUCTURAL ANALYSIS 


EASI ($300.00) is a data based oriented finite element program which 
solves plane frames, floor grids, space trusses, and space 


rames. The 
program computes member forces, node displacements, and restraint 
reactions. The semi-banded matrix solution allows large problem sizes in 
48 K - 64 K microcomputers. The program is coded in Microsoft BASIC and 
is available on TRS-80 & CP/M computers. 


EASI “4+” ($995.00) all of the above plus the following features: 


RELEASED MOMENTS - end moments can be released on individual 
members. 

IMPOSED DISPLACEMENTS - nodes can be set to a predetermined 
displacement prior to the analysis. 

THERMAL LOADS — accounts for temperature changes in the structure. 
Typical uses of this feature are steam pipes, uneven solar heating, and 
the effects of welding. 

30 PLOTTING ON DOT GRAPHICS PRINTER (graphics acre — When a 
mode is three dimensional, the program prompts the user for rotations 
(degrees) about the x, y, & z axis, then plots (with amplified 
ciepieceinente) that view. A low resclution graphics option is also 
available for 80 column screen display or standard printers. 

WEIGHT REPORTING — tabulates structural weights by material type. 


ANISOTROPIC MATERIALS — can model orthotropic or anisotropic 
materials (i.e. fiber-glass, plywood, etc.). It permits elements to have 
cluster material stiffness in the local x and y directions of the 
element. 


MEMBRANE ELEMENT (triangular and quadrilateral) - the membrane 


element can be incorporated into the space (plane) frame elements to 
ANALYZE SHEAR WALLS. 
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*#kk MESSAGE POINTER TABLE *** 
;Beginning of 128 15-byte file name buffers 


;Wait for operator's response 
;Loop to CHARIN if no response yet 
;File name buffer pointer 

;File attribut 

74-level local stack 


;Query flag 
; inni of 128 byte File Erase vector 
oni S8 ning yy 


; Director’ 
;Auxiliar’ 


7 
i 
i 
i 


5! 
READ/ONLY and SYSTEM',CR,LF,'S' 
No - FILES NOT ERASED 
'O.K. to erase? 

as READ-ONLY',CR,LF,'S$! 
SYSTEM" 

128*EN 


128 


' 


GENERAL DIRECT INPUT ROUTINE 


CHARIN MVI 
*** RESERVED DATA AREA *** 


*** DATA STATEMENTS *** 
7LE 


MVI 
CALL 
CPI 
JZ 
RET 


The EASI “4+” program is coded in baZic and requires CP/M. The baZic 
(included with program) is upward compatable with North Star Basic and 
executes programs very fast. TRS-80 computers will require CP/M. 
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CIRCLE 36 ON READER SERVICE CARD 


S-100 BUS 


BARE BOARDS 
COMPUTER IN A BAG 


ADD PARTS AND LABOR 


the RAMDISK™ Altemative 
A&T $550 Kit $500 


HOBBYISTS: 
Computer in a Bag! 
Consists of 4Mhz Z-80, 
UFDC-| Floppy Controller, 
256K DRAM Memory and 
Monitor/BIOS Disk w/SMARTS 
Disk Software (all Bare Boards) $200 
SYSTEMS UPGRADE 
4Mhz Z-80 CPU, UFDC-| 
256K memory, CP/M 2.2 
fully configured $1050 
For sales or additional info: 
GSR Computers Source Mail 
60-10 69th St. or STA 767 
Maspeth, NY 11378 Compuserve 
(212) 476-2091 EMAIL 
70265,500 


CIRCLE 22 ON READER SERVICE CARD CIRCLE 210 ON READER SERVICE CARD 


256K-DRAM 


Z-80 CPU 


FLOPPY DISK CONTROLLER 8”x5%” 


$150 - This Three Board Set 


OTHER BAREBOARDS AVAILABLE 


Prod. Code Price 
256K - DYNAMIC RAM CT256K-1 $70.00 
64K STATIC RAM S-64K $60.00 
Z80 PROCESSOR SBC-880 $45.00 
FLOPPY DISK CONTROLLER UFDC-1 $60.00 
CLOCK/CALENDAR - WITH 
BATTERY BACKUP $100-880 $45.00 

ALL MANUALS INCLUDED 


CA Residents - Add Sales Tax 

yee COMPUTIME 

(714) 536-5000 8614 HAMILTON AVENUE 
HUNTINGTON BEACH, CA 92646 


SOFTWARE REVIEW 


Access Manager 


by Bruce H. Hunter 


ccess Manager is a utility for the crea- 

tion of database-managed systems. A 

product of Digital Research, this utility 

is a B+ tree (hierarchical) file system 

for the building and accessing of data 
and index files. Access Manager (or AM-80 for 
short) is designed to interface with Digital Lan- 
guages such as the CBasic Compiler, Pascal/MT+, 
and PL/I-80. It is presently furnished in an 8-bit ver- 
sion and will be furnished in a 16-bit version. It is 
both CP/M and MP/M compatible and has both file 
and record locking. 

The mark of any good database system is its stor- 
age capability and its accessing speed. In an MP/M 
environment, AM-80 will allow file sizes of 32 Mb 
each. The maximum number of open data files is 40. 
Also the maximum number of index files is 40. Sixty 
simultaneously open buffers are permissible. The re- 
sult is well over a gigabyte of open storage. The CP/ 
M version is limited to 20 open data files of 8 Mb 
each and 10 open index files. Because of the B+ tree 
organization, a substantial number of indices are 
stored at each node, and the number of passes 
through the index to find a particular record is unbe- 
lievably small. It is possible to search nearly 200,000 
records in no more than four passes. Compare this to 
a binary tree that would require 18 passes for the 
same accomplishment. Data entered to index files is 
sorted sequentially. Once entered, data is never 
moved. The index files do all the housekeeping. 

AM-80 is a series of routines (program files) that 
are linked to the applications programs(s) at the final 
linkage. For a single user system, a subroutine library 
and a buffer are all that need be linked to the pro- 
gram. For multiuser systems, three components are 
required: the subroutine interface, the shared multi- 
ple-user background server, and multiple-user resi- 
dent system processes. The codes generated by these 
files are reasonably small, requiring less than 12K for 
all the functions. Multiuser object code will be in- 
creased by no more than 23K. 


Performance 

In practice, Access Manager is relatively easy to use. 
A header file is included into the object code at run- 
time by way of a preprocessor command. For exam- 
ple, in PL/I the command 


%include ’am8O0extr.pli’; 


will cause the header file to be read into the compiler 
as part of the object code. It saves about half a page 
of coding by declaring all the files and variables ex- 
ternal to the program. 

There are only four functions necessary to call for 
system initialization. Data and index files are opened 
or closed with a single function call. The most in- 
triguing part of Access Manager is the set of index 
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search functions. The functions available are: 

getkey—searches for an exact match 

serkey—searches for a match that will be equal 
or greater 

befkey—finds the key before the target key 

aftkey—finds the key following the target key 

frskey—returns the first key in the index file 

laskey—finds the last key in the index file 

prvkey—finds the key immediately preceding 
the the last entry found* 

nxtkey—finds the key after the last key 
found* 

*not recommended under MP/M 


The distinction between getkey and serkey is that 
getkey expects an exact match, as in looking for an 
I.D. number, while serkey is less exact, as in search- 
ing for a name that could be subtly different, like 
Alfred Newman vs. Alfred E. Newman. 

The system not only allows for the deletion of data 
records, but also allows for recovery of the space tak- 
en up by the record by returning that space back to 
the system for re-use. Statistical functions are avail- 
able to show the number of records in use versus the 
actual number of records. Functions are also avail- 
able for the setting and unlocking of file locks. 

Keys are stored as unsigned two-byte integers for 
most applications, but for unusually large files, a 
four-byte integer can be used with some additional 
housekeeping to bring capacity to the gigabyte range. 
Data files may be of any reasonably length as long as 
they are at least four bytes in length. The CP/M re- 
striction of 128-byte logical records has been nicely 
overcome by the very sophisticated housekeeping per- 
formed by AM-80. 

In practice, Access Manager is a pleasure to use. 
Once the preprocessor inclusion command has been 
put into the code, the variable names that are to be 
used in the code are declared (this not being neces- 
sary in Basic, of course). The number of buffers, keys 
and index files are defined, and the lock request is or 
is not made. Then the system is initialized. In all, the 
last few tasks will account for less than a dozen lines 
of code. Had this been done in BT-80 instead, a cou- 
ple of pages would have to be ground out before see- 
ing an executable line of code (something like pro- 
gramming in Cobal). In AM-80 you enter executable 
code at the bottom of the first page of code. Opening 
a couple of data files and a couple of index files takes 
a bit less than half a page more of code. 

In my code, index and data records are written si- 
multaneously at a cost of a half dozen lines per write. 
Error codes are returned on nearly every AM-80 rou- 
tine, and error processing functions can be created 
with reasonable ease by the programmer to keep the 
program from “falling down.” The search routines 
are straightforward and easily implemented. On the 
average, they take about four arguments each. For 
example: 

record-number = nxtkey 

(act-key, fil-no, lock, idxval); 


Access Manager continued . 


A mailing list or a chart of accounts can be written 
with Access Manager in about 10 pages of code, us- 
ing almost all of AM-80’s facilities, including a pro- 
cedure to rebuild the index files should they become 
“corrupted” by a premature closing. 

The documentation for Access Manager is a well- 
written 178-page manual. It tends to get just a bit 
obscure on the handling of numeric key values and on 
the index value of the output argument, IDXVAL, 
but other than that it reads easily. There is a new 
manual coming out for the 16-bit version, AM-86 
that is supposed to be even better, and it will also be 
the new manual for AM-80. DRI is making a distinct 
effort to have common manuals for both 8-and 16-bit 
versions of just about everything coming out of the 
Language Division to demonstrate the near-total 
compatability of the versions. Like most of DRI’s re- 
cent documentation, an index is provided. There area 
number of programming examples included. The ap- 
pendix has a program to create a database. It is writ- 
ten in Basic, Pascal, and PL/I. 

Unfortunately, the Pascal and PL/I versions are 
direct translations of the Basic program. I say “un- 
fortunately,” because Basic and Pascal of necessity 
must be programmed bottom up as opposed to the top 
down programming that PL/I thrives on. The result 
is that the code is a bit difficult to follow. An entire 
re-creation program is furnished as well, to rebuild 
an index that has been inadvertently destroyed. It is 
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educational and downright handy. 

I have written a number of business programs with 
AM-80, and to date have found no bugs. Correspon- 
dence with a beta test site of AM-80 has revealed no 
bugs either. It speaks well for DRI’s beta testing. 

There are few utilities comparable to AM-80. I 
have been informed that there is a system called Mi- 
cro B+ written by Bill Fairman of FairCom that is 
reputed to be a close match. The closest that I have 
worked with personally is Digital’s BT-80. I brought 
up BT-80 about a year earlier and found that the 
amount of pointer handling involved and the enor- 
mous amount of initialization required made the util- 
ity difficult to use. In addition, BT-80 is compatable 
only with PL/I-80 (which was no hardship, for me as 
PL/I is my language of choice, but it is not every- 
one’s choice). AM-80 is compatable with a minimum 
of three languages. There are a few DBMSs available 
that provide a language interface. Among them are 
MDBMS, TIM, CCA, and IDM-M2. Of these, the 
closest to AM-80 would be MDBMS (at $900). The 
majority of DBMSs, like Ashton Tate’s dBase II, are 
not programmatically accessable. Access Manager is 
priced at $300 and is available from both Digital Re- 
search directly and through the normal distribution 
channels. From a consumer’s point of view, I should 
mention that software purchased directly from DRI, 
although not discounted, does have the advantage of 
being refundable if returned within a reasonable pe- 


Software turbulence?? 
Fly DataFlex! The best data base software in the sky! 


DataFlex couples a jet fast relational data base with a 
powerful command language and utilities so you can 
build turbocharged applications. A single command 
gets information from your data base and displays it ona 
screen or report. 


With DataFlex you won't have to burn extra fuel search- 
ing the skies for add-on utility packages to get the power 
and performance you need. From menus and multi-file 
data entry screens and reports to automatic file defini- 
tion and an integrated text editor, DataFlex is a complete 
application development system. 

DataFlex runs on CP/M, CP/M-86, MS-DOS, and most 
microcomputer multi-user operating systems and net- 
works. Applications developed on one can be trans- 
ported to another without change. ..even from 8 to 16 bit 
and single to multi-user systems! 


For a high performance system that'll keep your applica- 
tions flying, get DataFlex!!... 


DATAACCESS 


CORPORATION 


4221 Ponce De Leon Bivd., Coral Gables, FL 33146 
(305) 446-0669 
TLX 469021 Data Access Cl 


CP/M, CP/M-86 are registered trademarks of Digital Research. 
MS-DOS is a registered trademark of Microsoft. 
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with Hayes. Micromodem. 11/ Avatar/ _ 3 


ie Big Board/California Computer Sys-_ 


_CompuPro/DEC VT-180//Eagle II/ 


__ Eagle III/Eagle I IV/ Escort/Exxon § 500/ 
Godbout System Support Board/— 


Godbout Interfacer 3/ Interfacer 4, 4/ /Hayes — i 


_ Micro-modem 100 or 80-103A/Imsai 


— $102-2/ /Intertec/ ‘Ithaca/Kay | Pro II/ /Lobo - 
__Max-80/ Monroe OC 8820/ Morrow De-_ 


_ Northstar _ Advantage/Northstar_ op 


~ Horizon/¢ Osborne I/Otrona/PMMI _ 


avive 103A/Radio_ “Shack _ “Model aie 


: MBC-1250/ -1250/Sanyo ierra 


Data Sciences _ZSI0/Teletek/Tele-_ . 


The most flexible 
Data Communications Software 
you can buy. 
$150.00 


Dealer and distributor inquiries welcome. 


MYCROFT 
Lof3Sinc 


P.O. Box 6045, Tallahassee, FL 32314 (904) 385-1141 
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Access Manager continued . 


riod of time (for a nominal restocking charge). 

Programs written using AM-80 to create a data- 
base-managed system could and should rival main- 
frame systems. Retrieval speeds are phenomenal. A 
common database built by these programs is access- 
able from any other program using AM-80, even if it 
is written in another language. Additional benefits 
are extremely compact data and index files. AM-80 
allows the programmer to assign only as little space 
as required by the records. In spite of the fact that it 
still has fixed-length records, the removal of the re- 
striction of multiples of the logical record length al- 
lows fantastic economy of storage. Couple this with 
gigabyte capacities, and you have the capability of 
writing an application program to run under CP/M 
that would otherwise need a $10,000 computer run- 
ning MP/M. In performance it may rival programs 
run on a much larger machine. 

Most of the programs I have written and linked 
with AM-80 routines produced under 30K of ma- 
chine code, including high-speed storage allocation. 
The need for using large amounts of storage for sort- 
ing data is eliminated because AM-80 has kept the 
keys in ascending sort order automatically by its 
built-in housekeeping routines. With these routines, 
the writing of search and sort routines becomes aca- 
demic. For any programmer involved in the writing 
of database systems in one of Digital’s 3 languages 
(CBasic, Pascal MT+, or PL/I-80), AM-80 will be 
a welcome aid. o 


THE SIMPLEST WAY 
TO MIND YOUR MONEY 


(AND THE STORE) 


PRO BOOKKEEPER 
A Simplified Computer Bookkeeping System 
Print complete checks, pay bills, keep checking and 
payable accounts, get reports on income, 
expenses, profit, pay and tax records. 


QUICK REGISTER 
A Point of Sale Inventory System 


Chuck Atkinson Programs 
Rt. 5, Box 277-C 
Benbrook, Texas 76126 
(817) 249-0166 
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Selecting software is really a game of 
strategy: positioning the right product 
at the right time for the most effective 
results. 

At Whitesmiths, Ltd., our full line of 
software products is designed to do just 
that and more. Our time-tested compil- 
ers are available for five architectures, 
complete with Pascal translators and 
cross-support for a wide range of envi- 
ronments. From the MC68000, to the 
IBM PC, to the DEC Professional, our 
compilers and cross compilers cut soft- 
ware development time and reduce 
dependence on operating systems and 
instruction sets. 

Idris, our exclusive operating system, 
is powerful, small and extremely porta- 
ble. Written almost entirely in C, it runs 
where other operating systems can’t even 
fit—on an MC68000 with no memory 
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management hardware, for example, or 
on a bank-switched 8080 or Z80. And 

it outperforms UNIX on comparable 
systems—an MC68000 with memory 
management hardware, for instance, or 
any PDP-11 or LSI-11. It even makes good 
use of a VAX, so you know you won't 
outgrow it! 

In addition, our full line of Software 
ALa Carte lets you select just the pieces 
you need to tailor our products for your 
unusual requirements. From portable 
libraries to special purpose tools, all 
ALa Carte items are tested, easy to use, 
and very affordable. 

To make things even sim- 
pler, Whitesmiths, Ltd. has 
introduced a new market- 
ing tool: the Authorization 
Seal. Instead of hassling with 
complex license agreements 


and other legal stumbling blocks, you 
simply affix a serially numbered Auth- 
orization Seal, issued with each sale, to 
any machine that retains a copy of our 
software. End of hassle. All our customers 
—end-users, OEMs, and sublicensors— 
benefit from the elimination of multi- 
tier licensing agreements and detailed 
record keeping. 

Compilers, Idris, Software A La Carte, 
and the Authorization Seal: together they 
can position you for today’s competitive 
market—and tomorrow’s. Before you 
make your next move, call or write to 
Whitesmiths, Ltd. today. We'll 
be glad to help you play to win. 


Whitesmiths, Ltd., 

97 Lowell Road, Concord, 
MA 01742, (617) 369-8499 
TLX 951708 SOFTWARE CNCM. 


Whitesmiths, Ltd. 
Software Craftsmen 


UNIX is a trademark of Bell Laboratories; DEC Professional, VAX, PDP-1] and LSI-1] are trademarks of Digital Equipment Corporation; IBM PC is a trademark of International Business Machine Corporation. 
Distributors: Australia, Fawnray Pty. Lid., P.O.B. 224, Hurstville, NSW 2220 (612) 570-6100; Japan, Advanced Data Controls Corp., Chiyoda-ku, Tokyo (03) 263-0383; United Kingdom, Real Time Systems, Newcastle upon Tyne 0632 733131 


Do 


you have the 


the entire S100 


We do. 

And now you can too: The most powerful 
multi-processing CPU board you can buy. The 
world's first 256K static RAM memory board. 
And the most sophisticated hard disk controller 
board available. 


Run 8-bit CP/M 80* and 16-bit CP/M 86* 
simultaneously in a single or multi-user 
environment. $895. 

Now you can upgrade to 16-bit without for- 
saking your investment in 8-bit software. Octagon’s 
plug-and-play CPU Board 8/16™ is a complete 
computer-on-a-board with all this: 

« Dual processors: 4MHz NSC-800 (executes full 
Z80" instruction set) and 8MHz 8088. 

¢ Intel 8272 floppy disk controller with 24-bit DMA. 
Runs up to four 5%" or 8” floppies in any combi- 
nation at the same time. 

* 8K PROM monitor. Boots operating system and 
also contains all the disk interface software you 
need for almost any operating system. Plus many 
useful debugging features, such as memory test, 
memory dump and memory search. 

* Iwo serial ports (baud rate software selectable 

up to 19.2 Kbauds.) 
___ e Interrupt controller with eight vectored 


* Fixed frequency real-time clock interrupt for 
multi-user dispatching. 
¢ IEEE-696 S-100 compatible. 

Add the optional 8087 math co-processor 
for just $300. 

And save $155 when you buy the 
operating system from Octagon, whether you 
take Concurrent CP/M 86 at $195, CP/M 86 at 
$150 or MP/M 86% at $495. 

CPU Board 8/16 is completely ready to run 
with no additional software. And both operating 
systems automatically include your CP/M 80 
emulator, so you can run any 8-bit CP/M pro- 
gram—as well as auto-select bios that let you 
transfer files back and forth between 5%" and 
8" floppies. 


World’s first 256K Static RAM Memory 
Board. $1850 

Memory may be configured as either four 
totally independent 64K software-selectable 
blocks or as a single 256K block which responds 
to IEEE-696 extended addressing lines. Will ac- 
cept either 8-bit or 16-bit bus requests. 

And each 64K block can be one of 256 
addresses—so theoretically you could address 
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guts to take on 
micro industry: 


up to 16MB of these boards in your system. ECC generation and correction on data fields is 
A partially populated 128K board with the user selectable. 
same characteristics is just $1095. And its phase lock loop lets you forget about 
Sophisticated, reliable Hard Disk critical timing adjustments. In fact, you never need 
Controller. $550. to adjust it at all. There’s no pot. 


Octagon’s Hard Disk Controller Board also 
gives you data rates up to SMBits/sec., and CRC 
generation and verification on ID fields. Complete 
subsystem including board and 19.2 MB hard 
disk packaged with power supply: $2195. 


1-408-262-7777 
Call us now for more details. And take advan- 
tage of these introductory offers: Buy CPU Board 
8/16 plus the Memory Board and get Concurrent 
CP/M 86 or CP/M 86 free. (Includes CP/M 80 em- 
ulator.) Or buy all three boards and get MP/M plus 
new Personal BASIC from Digital Research free. 


Designed around LSI technology for greater 
reliability. With its sophisticated Western Digital 


1010 hard disk controller chip to control up to four You'll never need any other S-100 boards. It 
5¥4" drives, this unique board gives you auto- takes guts to say that, but try us out and you ll 
matic seek, automatic retries after error; comes know: Octagon has what it takes. 


with both CP/M 80 and CP/M 86 bios; and = 

includes two serial ports and one Centronics- ss) 

compatible parallel port. ( OCt Onl ee 
Using the WD 1014, it detects and corrects <f 

single-bit errors and detects double-bit errors. 2960 North First St. San Jose, CA95134 4 


*CP/M 80, CP/M 86, MP/M 86 al 
of Digital Research. Z80 fadema’ 
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SOFTWARE REVIEW 


Fancy Font 


A new software package that marries CP/M and 
the MX series of Epson printers 


by Bob Kowitt 


ith Fancy Font, you can (1) set print 

using all of the standard Epson type 

styles, (2) use a great many type 

styles supplied by the authors, or— 

and this is what gives the package 
some of its greatest strength—(3) create your own 
type font. The fonts supplied or created by Fancy 
Font use the Epson bit graphics capabilities, and are 
therefore very slow printing compared to the stan- 
dard speed of the Epson line. The results, however, 
are worth the time whenever special appearance is 
important. 

Perhaps the expression, “create your own type 
font” is a bit of hyperbole. As anyone familiar with 
type knows, designing a type font is a major job re- 
quiring many months of work. You can, however, 
take an existing type font and, with the help of a ty- 
pographic specification book, modify it to resemble 
another font already in existence. For example, take 
the simple Sans Serif type font supplied, extend it, 
thicken it where required, and create a copy of Venus 
Bold extended. 

Fancy Font is more than a system that uses the bit 
graphics of the Epson printers—it is also a text for- 
matter. You can set margins, justify, print headings 
and footings, number pages, print selected pages, un- 
derline, modify line width, substitute strings within 
the copy, and do a few other operations from within 
the text. Copy can be created via any CP/M word 
processor with word wrap. You must, however, be 
certain that the word processor’s justification is off to 
allow Fancy Font’s justification to take over. Inciden- 
tally, the WordStar soft hyphen is recognized and 
translated to a hard hyphen for printing. 

The first lesson should consist simply of producing 
a document using standard type fonts. SoftCraft, the 
distributor of Fancy Font, includes 27 type fonts for 
your use, among them a Roman style in regular, bold, 
and italic in 8-,10-,11-,12-, and 18-point sizes, a Sans 
Serif style in the same sizes (with one size in italic) a 
script font in 12-, 14-, and 18-point, and an Old En- 
glish font in 18- and 20-point, as well as several other 
inclusions (see Figure 1). 

Your text must include, in addition to the format- 
ting commands mentioned above, directives to Fancy 
Font to change type fonts. This is done by entering a 
change character which, as supplied, is the backslash 
‘/’ character. Should you use the backslash in your 
text, it is a simple matter to substitute any other 
character you want as a change character by calling 
for it when invoking the program. By including the 
directive ‘/f2’, Fancy Font is directed to use the sec- 
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ond type font in the list of type fonts specified when 
the program is invoked. This type font will be used 
until another is called for. Should you not specify any 
type fonts in the program invocation, Fancy Font will 
select the standard Epson MX fonts from a table in- 
cluded in the manual: Font 0 is normal, Font 1 is 
compressed, Font 2 is expanded, etc. 

Establishing the correct line width takes a bit of 
experience. The default setting for the widest line is 
set at 7.5 inches. This may be modified by altering 
the FANCFONT.PRO file to read MX100 instead 
of MX80. Fancy Font recognizes the fact that the 
space required by a character is different for each 
type font. This space is not related to that taken by a 
typewriter or the normal Epson printer font. A 50- 
character line will print differently using Roman 12- 
point than it will using Roman 8-point or Roman 18- 
point. Therefore, when you set your margins on the 
word processor to 50 and try to print Roman 18- 
point on a 5” line, you will get an error message let- 
ting you know that the line is too long for the avail- 
able space. If you arbitrarily reduce the word proces- 
sor line width, you might find out that Fancy Font’s 
right justification puts too much space between 
words. 

I resolved the problem by making a typeface sam- 
ple sheet. This consisted of 30-character wide sen- 
tences of each type font. I selected 30 and not 65, 
since the larger type fonts would have printed wider 
than my sheet. Using this sample sheet, I could set 
my word processor margins to the width that would 
produce the size desired in the finished product (see 
Figure 1). 

The manual recommends running the PFONT 
printing program in ‘SD’ mode during text prepara- 
tion. This mode does not print the text but does dis- 
play all lines on the terminal. In this mode you can 
catch any overlong lines or any other errors you 
might have made in specifications. Naturally, the 
lines are not displayed in the special fonts. I would 
also suggest that the ‘RD 2’ mode be invoked on the 
first attempt to print. RD permits printing in a choice 
of three degrees of roughness. RD 0 is the default 
mode and is the finest quality available. However, it 
is slow, since it takes nine one-way passes to produce 
each line of type in a 12-point size when there are 
descenders, and six without descenders. RD 2 is 
rough and certainly not presentable quality. It is, 
however, a fast presentation of how the text will lie on 
the page and how the formatting is working. 

Once the text is prepared, Fancy Font can be in- 
voked in three ways: 


1. within the CP/M command line 
2. interactively, with PFONT prompting for in- 
put 


64K STATIC RAM MEMORY 


MM65K16S rev3. 


Sahar 


S-100 STATIC MEMORY 
BREAKTHROUGH 
SSE 


Finally, you can buy state-of-the-art 
S-100/IEEE 696 static memory for your 
computer at an unprecedented savings. 

Memory Merchant's memory 
boards provide the advanced features, 
quality and reliability you need for the 
kind of operational performance 
demanded by new high-speed 
processors. 


Completely Assembled. 

These memory boards are not kits, 
nor skeletons — but top-quality, high- 
performance memories that are shipped 
to you completely assembled, burned-in, 
socketed, tested and insured with one of 
the industry's best warranties. 


Superior Design & Quality. 

Memory Merchant's boards are 
created by a designer, well known for his 
proven ability in advanced, cost-efficient 
memory design. Innovative circuitry 
provides you with highly desired features 
and incredible versatility. 

Only first-quality components are 
used throughout, and each board is 
rigorously tested to assure perfect and 
dependable performance. 


No Risk Trial. 

We are so convinced that you will 
be absolutely delighted with our boards 
that we extend a no-risk trial offer. After 
purchasing one of our boards, you may 
return it (intact) for any reason within 15 
days after shipment and we will refund 
the purchase price (less shipping). 


NEW S-100 PRODUCTS COMING 
SOON: 
* DUAL 8/16 BIT CPU BOARD 


* 128K 8/16 BIT STATIC RAM 
* 256K 8/16 BIT DYNAMIC RAM 
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$629. 


48K PARTIALLY POPULATED $519. 
32K PARTIALLY POPULATED $409. 


— SS) 


64K RAM, MODEL MM65K16S 

© 64K x 8-bit 

© Speed in excess of 6 MHz 

e Uses 150ns 16K (2K x 8) static RAMS 

e Ultra-low power (435 Ma. max. — 
loaded with 64K 

¢ Bank Select and Extended Addressing 

e A 2K window which can be placed 
anywhere in the 64K memory map 

© Four independently addressable 16K 
blocks organized as: 
— Two independent 32K banks or 
— One 64K Extended Address Page or 
— One 48K and one 16K bank for use 

in MP/M! (option) 

e Each 32K bank responds 
independently to phantom 

© 2716 (5V) EPROMS may replace any or 
all of the RAM 

e Field-proven operation in CROMEMCO 
CROMIX* and CDOS*. 

© Compatible with latest IEEE 696 
systems such as Northstar, CompuPro, 
Morrow, IMS, IMSAI front panel, Altair 
and many others. 

OEM and DEALER inquiries invited. 


ae | 


Memory” 
Merchant 


14666 Doolittle Drive 
San Leandro, CA 94577 
(415) 483-1008 
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tian amitiniitiiithanic men 


FULL TWO-YEAR 
WARRANTY. 
Se 


The reliability of our boards, 
through quality-controlled production and 
proven performance, has enabled us to 
extend our warranty to a full two years. 
That’s standard with us, not an option. 
This includes a 6-month exchange 
program for defective units. 

Shipped direct from stock. 

All Memory Merchant’s boards are 
shipped direct from stock, normally 
within 48 hours of receipt of your order. 
Call us at (415) 483-1008 and we may be 
able to ship the same day. 
16K RAM, Model 
MM16K14 


16K STATIC RAM $169. 


16K x 8 Bit 

Bank Select & Extended Addressing 

Four independently addressable 4K 
blocks 

One 4K segment equipped with 1K 
windows 

Uses field-proven 2114 (1K x 4) RAMS 

Low Power (less than 1.2 Amps) 

Runs on any S-100 8080, 4 MHz 2-80 or 
5 MHz 8085 system. 


Prices, terms, specifications subject to 
change without notice. 


*Cromix and CDOS are trademarks of CROMEMCO. 
' MPIM is a trademark of Digital Research 


Fancy Font continued... 


Sans Serif Italic 12 point. Also, make the line 
width 5.5 inches. Within the text the ‘/j’ directs 
Fancy Font to right justify starting at this line and 
continuing until the ‘/k’ turns off the justification 
for the line in which it is located and thereafter. To 
turn off justification, temporarily, just for the one 
line, use /b. 


3. from a command file called for in the command 
line. 


The command line for the sample in Figure 1 is: 


A)PFONT DEMO.FF +F0 ROMN12 SCRP 12 : 
ROMNB12 SANSI12 +LW 5.5 


This is translated as: 


These directives can take either upper or lower 
case. 


Editing a font 


Fancy Font stores each font in a file that contains 


PFONT: Use the file DEMO.FF on the default 
drive. At all points in the file that say ‘/f0’ use 
Roman 12 point, for ‘/f1’ use Script 12 point, for 
‘/f2’? use Roman Bold 12 point and for ‘/f3’ use 


ROMNS I read the ad for Fancy 
ROMNi0 "This sounds great 
ROMNI10 king presentations for 
ROMNBIO rtising copy. They an 
ROMNIi12 has) any advertising 


and is often called 


ROMN/I12 1 read the ad for Fancy 
ROMNBI12 "This sounds great 


ROMNIS8 king presentations for 
ROMNTII8 rttsing copy They an 
ROMNBI8 has any advertising 


ROMN I read the ad for Fa 


ROMN8SP This sounds great 
SANS10 king presentations for 
SANS1?2 rtising copy. They an 


SANSI18 has any advertising 


OMBE1S I read the sad for S#anry 


OmM@BECD Chis sounds great 
SERPIB has any nl 


Somp20 F read the ad for Famey 
(MELT king presenlalions f 
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Figure 1. Samples of fonts provided. 


Teleteks 
New Combo 
Could Make 
You A Hero! 


The SBC-II could be just the 
right ingredient for your latest 
concoction. The newest member 
of Teletek’s family of multi-user, 
multi-processing S-100 products, 
the SBC-II essentially combines, 
or “sandwiches” two Teletek 
SBC-I’s into one board. The SBC- 
Il provides the capability to sup- 
port two users from one standard 
size IEEE-696/S-100 slave board. 

The SBC-II maintains full 
performance for each user with 
an independent CPU (Z80A or 
Z80B), 64K RAM, Serial I/O, and 
FIFO communications port to 
the system master. The system 
integrator benefits by getting 
complete support for two users 
for the price of one board. 

TurboDOS and MDZ 
operating systems will support 
combinations of SBC-l’s and 
SBC-II’s offering system design 
efficiency and flexibility never 
before possible. 

If you’re hungry for value 
and efficiency, order an SBC-II 
from Teletek. You'll love every 
byte. 


TELETEK 


4600 Pell Drive 
Sacramento, CA 95838 
(916) 361-1777 
Telex 4991834 TELETEK 
Dealer inquiries invited. 


© Teletek 1983 
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lt took 
hundreds of years 
to build the world’s 
mostadvanced 


Way back in 1534, a Venetian scholar 
wrote a text that standardized the 
techniques of modern bookkeeping. 
And up till 1979, there weren't a lot 
of real improvements in the way 
people did spreadsheets. You still 
had to enter all your figures by hand. 
Run all the totals yourself. And when 
you had to make a few changes, you 
had to run the totals all over again. 
Then along came a program that 
let you create spreadsheets on a 
personal computer. Without touching 
apencil. Or adding anything by hand. 
Best of all, this new program gave 
you the freedom to look at your bal- 
ance sheet a dozen different ways if 


1534 


2540 Adi ukimo E 


294 Pro ey danno // A doniuarij , p 
Lee trattoin refto, per faldo di quello 
295 pro ey danno // A Spefe de uiu 
Stt fpefe fatte,come in effe appar, per 
iio fa 
i 
196 P Fittidella poffefton da Moidn.// 
SEE, perfitto di quella per anno prefe 
154u,perfaldo de quell FP 45 
a 
297 2 Prox danno // A Spefe diuerfe 


4+ Panno prefente,come inefJe appar 
399912 
(Seem 


——= oe 


—+——_——_ 
Pro ex danno // A Spefe de fala 


3 98 
Zit  piufpefe fatte Panno prefente , co 
per faldo di quelle OF 48 9 12 § 
ee ee eed 
299 Pro de zeccha in monte // A Pro & 
SEL Ita feguida,come in quello appar, 
1309 — — 
yoo FP Proetdanno // A Cauedal de mi 
att per utilita feguida de Panno 1 s40.t 


you felt like it. Because all you had 
to do was change one figure, and the 
computer would refigure everything 
else for you. Automatically. 

Like most breakthrough ideas 
though, this original spreadsheet 
program had a few things that defi- 
nitely needed improvement. For in- 
stance, all the columns had to be the 
same width. And the entire system 
took about 20 hours to learn. 

So we developed SuperCalc® 
which was such a giant step in the 


1979 


STATEMENT 
JAN FEB 

SALES igae 1196 

& COST R71") 330 
GROSS 70D 778 
R & D 160 176 
MARKETING 200 224 
ADMIN. 146 151 
TOTAL 509 551 

® 
INCOME 200 BIG nes. 
TAXES ey] 88 
NET 128 131 


ss 


right direction that it became a best- 
seller Over 250,000 copies in only 
18 months. 

Today, we've gone even farther. 
After talking with thousands of cus- 
tomers, we've found a lot of impor- 
tant new features you'd like to have. 
And we've built them into the world’s 
most advanced spreadsheet. 

SuperCalc?. 


INCOME STATEMENT 


NET SALES 
@ COST OF GOODS SOLD 


GROSS PROFIT 


_RESEARCH & DEVELOPMENT 
MARKETING 
ADMINISTRATIVE 


—— | TOTAL OPERATING EXPENSES 


__INCOME BEFORE TAXES _ 


INCOME TAXES 


NET INCOME 
| 
& | 
i @ 
oe 


Pil take 
you 10 minutes to 
learn it. 


E 10 _ minutes to 
be Su 


2 perCalc 
$ Create With SuperCalc? you step by step. And an AnswerKey™ But with all its advanced features, 
ea get all kinds of fea- that gives you instant help right on SuperCalc? is the same price as the 
modelin turesthathave never the screen. Because of these fea- original SuperCalc. Only $295, sug- 


10 minujes : 
flat. been possible before. 


Like custom format- 
ting capabilities. Auto- 
matic consolidation. Sorting. And 
more. Take a look at the spreadsheet 
below, and you'll see just how much 
we're giving you. 

Best of all, we made it just as easy 
to use as the original SuperCalc. 
There's a self-paced starter guide 
that shows you exactly what to do, 
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tures, you can actually create your 
first spreadsheet in 10 minutes flat. 
Even if you've never used a compu- 
ter before. 

SuperCalc? is available for the 
IBM PC and XT. Where it can run in 
full color With full memory. Even on 
hard disk. It's also available for CP/M, 
CP/M-86, MS DOS and other opera- 
ting systems, so you can use it with 
most popular personal computers. 


Combines 
any number of spreadsheets 


gested retail. We're also offering 
SuperCalc for only $195. And an up- 
grade to SuperCalc? whenever 
you're ready. 

So. If you've always thought there 
had to be a better way to do your 
spreadsheets, stop by your closest 
computer store. And take a good 
look at SuperCalc? After just 10 min- 
utes, you won't want to do one more 
spreadsheet the old way. 


Calendar/date 


—automatically! capabilities. 
= v4 Percentages. 
COMPANY CONSOLIDATED MONTHLY PAYROLL _ } 
@ | Today"*s Date 4/15/83 Deduction Fercentages 
| Payroll Start Date 38 4/ 1/83 = Fica shige 7 OBA 
4 Days this period ~ i SDI U fdas lol 
@ | Recalculate YTD Y/N ? N ser-set decimal places. 
|¢ oe me Re eee es 3 Gross Total — 2 Net YTD 
e Emp# Employee name Status Salary Deduct Pay Gross 
|| 34 Adams ie Be $1,199.00 ( $82.59) $1,917.50 $6,200.00 
jrol 49“ Beckette S$ $750,008 ( $946.25) $693.75 $5,250. 90 
a 84 Johnson $ $850.00 ( $63.75) $786.25 $5,959.90 
2} 92 Jones Bee ee | $900.09 ( $67.50) $832.59 $6,300.90 
{3} 12. Samson S $560.00 ( $42, GG) $518.00 $3,929.00 
@\ 19 Santos M $650.00 ( $498.75) $691.25 $4,550.00 
ia 45 Smith ee $790.00 ( $52.50) $4, 990. OO 
@° = Total # employee 7 Floating $ signs. Embedded commas. 
18) 
® Total Gross Salaries (1@@*s) $55.1 £ aaa Sas Say 
@*» Total Deductions (18's) $-4.1 
2 Total Net Pay (19@*s) ae Stee, i Te Se eee vs 
@° Arrange reports 
baa numerically or | Numbers in 100s or 1000s. 
at ~~ alphabetically, . Ricca Coren 
‘i — SuperCalc2 
28| aa Ty ee so RI SUR Ronea, = ; : = : es 
| 
i] om ® 
o° & SORCIM 
a ee = = RO 2310 Lundy Avenue 
@* San Jose, CA 95131 
tg Si Deana eae ve a _____ (408) 942-1727 
@ . CP/M is a registered trademark of Digital Research. CP/M-86 is a trademark of Digital Research. MS DOS is a registered trademark of Microsoft Corporation. IBM is a registered trademark of international Business Machines Corporation. © 1983 Sorcim Corporation. 


bas Tess 


ar 


Fancy Font continued... 


directives to the Epson printer. Within EFONT, the 
editing program, lies the means to create an ASCII 
file for each character in an existing font. This AS- 
CII file consists of an asterisk for each dot on the 
Epson dot matrix head. This file can be loaded into 
any text editor or word processor and modified into 
any shape desired. Of course, the idea is not to take a 
Roman type font and turn it into script. But it may be 
desirable to take this Roman type font and make it 
bold or take a Sans Serif font and create a condensed 
version. 

Moreover, anyone familiar with the printing in- 
dustry is aware of the hundreds of specialized type 
styles available. Using a standard typeface, it is quite 
easy to modify it into any of these standard fonts. 
Also, it is possible to create a small typeface and set it 
within the space allowed for a larger size—for exam- 
ple, 6-point in a 12-point space. The smaller typeface 
can then be moved to the top of the space provided 
where, when used, it becomes a superscript. As you 
can see, the system is very flexible. 


Creating a font 

Creating a new font should be as simple as looking at 
a font within the Hershey file supplied. This file is a 
set of characters developed for the National Bureau 
of Standards. The Hershey set is used to create your 
own fonts by assigning any of the characters within it 
to a set of ASCII values. For a normal alphabet crea- 
tion, this would mean assigning the letter ‘A’ to 65, 
‘B’ to 66, etc. During the creation process, the stan- 
dard characters may be enlarged or modified in any 
way desired. 

There can be more interesting things available, 
however. The Hershey file contains a Russian, 
Greek, and German alphabet, as well as many special 
symbols for music, playing cards, zodiac, math, bells, 
trees, triangles, stars, and many, many more. The 
new font procedure would be to assign an ASCII val- 
ue to any of these characters; at least, it should be 
that easy but, unfortunately, until you learn the pro- 
cedure, it isn’t so simple. 

That is the one fault I could find in the documen- 
tation. There is no tutorial on creating and editing a 
font, and the process, while not difficult once learned, 


Char ache 


- fae) Lire 


is difficult to figure out from the procedure as out- 
lined in the manual. 

When CFONT is called up, several options are of- 
fered. To create a new font, each character in the 
ASCII set must be (M)apped to a corresponding 
character in the Hershey set. This mapping is contin- 
ued until all the characters wanted are mapped. I 
thought at first that each character had to be gener- 
ated as soon as it was mapped, before going on to the 
next one; this would require a very long creation pro- 
cess. However, mapping is best done as a complete 
operation. Once all the characters are mapped, the 
size factors should be selected for modifying the 
shape. Then, and only then, should characters be 
(G)enerated. They are then saved to an output file. I 
suggest that this output file not be named by the final 
name you will use for the font. 

Now invoke EFONT. With EFONT, the left and 
right margins are set. This determines the amount of 
space each character will take up on the page, and 
can be uniform or changed for each character. All 
characters are supplied with a margin the size of one 
dot on each side. Therefore, the ‘I’ will take up less 
space than the ‘M’. This can be modified during a 
font design, and time should be taken to do it right. 
After all, this font will be used many times, and if it is 
worth creating at all, it should be fine-tuned as close- 
ly as possible. Mapping, margins, and resulting out- 
put are shown in Figure 2. 

I enjoy bridge, so I designed a four-character font 
called CARDS. This font assigns the symbol for the 
club suit to the letter ‘C’, the symbol for diamonds 
‘D’, the symbol for hearts ‘H’, and the symbol for 
spades to ‘S’. After creating this card font with the 
Hershey set, I invoked EFONT, the Fancy Font edit 
module. Using the (L)oad command, I brought in the 
created font and, with the (E)dit command, saved 
each character in its own ASCII file. The (P)rint 
function with EFONT printed each character, its pa- 
rameters, and five examples of the character as it 
would appear in use. 

Since I prefer to have the card symbols filled in, I 
edited each character’s ASCII file with WordStar to 
fill in the open spaces with asterisks. This produced 
the final file as shown in Figure 3. 


ee Ct ht mec 3 in " be Bo ¥OCOSE ct " 


(bt) KAMIRAMM 


Figure 2. (a) Mapping of a character: (b) resulting printed output. 
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Does Yours Compare 
with OMNIDISK 7 


poenenaneeneer 


see me ee 
wees eee re! 


wesiee  f 


‘i 


ewemwan 


introducing tomorrow's disk controller. . .OM NIDISK offers 
a unique combination of compatibility and technological innovation that. 


together produce features not found in any conventional disk controllers. See for 


yourself what tomorrow looks like: 


Simultaneous support of both 514” and 8” floppy 
disks allows software transfer between disks. 


Our custom on board firm wear permits address- 
ing of memory beyond 64K as RAMDISK. 


Y/ 24 bit DMA allows CPU by-pass. 
VA Power-on boot PROM gets you running fast. 


On-board de-blocking conserves valuable RAM 
space above bios. 


Interfaces with the WD 1001° hard disk con- 
"troller. No need to buy a host adapter. 


Va Full 16 bit port addressing. 


Full track buffer allows controller to recall entire - 


track, not just sectors. Results in a speed in- 
crease 3-to-7-times greater than conventional con: 
trollers for both read and write operations. 


OMNIDISK’S features reflect our committ- 


“ment to designing S-100 products with an eye on 


the future. OMNIDISK’S price reflects our com- 
mittment to offer products with an eye on the 
needs of today’s user 


You can begin using S * 
tomorrow’s disk con- 
troller today for only. . . 


So why wait, order now. 


*CP/M* 2.2 configured for OMNIDISK, only $25 
with. purchase. 


oo 


Vf 


FULCRU 


distributed by: 
W.W, COMPONENT SUPPLY INC. 
M1771 Junction Avenue - 

San Jose; CA 95112 

(408) 295-7171 


COMPUTER PRODUCTS 


FREE U.P.S. ground shipping on pre-paid orders. Shipping will be added to C.0.D., 
VISA and M/C orders. CA residents please add sales tax. 
*CPIM is a registered trademark of Digital Research. 
Call today for information regarding our new 8 MHz CPU. 
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left marqin, right margin, tao y coord, #1 1 45 


HC Wie Ye aes is ic ee He 2a is 
x 4 


ha 


This is a demonstration of a new font called CARDS 


* Hageline 


The hand consisted of the following: 


@ AKQ973 
V 56 
@ KQ74 


(b) 


Figure 3. (a) Mapping of Hearts character; (b) demonstration 
of output of complete CARDS font. 


The original text file for this demonstration is: 


The hand consists of the following: 


\fIS\fFO AK Q973 
\fIH\fO 5 6 

\fID\f0 KQ74 
\fIC\fO A 


This is a demonstration of a new font called 
CARDS. 

The print produced in Figure 3a was produced by 
invoking Fancy Font in the command mode: 


A)»PFONT CARDS.FF +F0 ROMN12 CARDS 
The CARDS font consists of four characters in 
which the club symbol is ASCII 67, ‘C’; the diamond 
is ASCII 68, ‘D’; the heart is ASCII 72, ‘H’; and the 
spade is ASCII 83, ‘S’. Whenever PFONT reads an 
‘S’ in font 1, it produces the symbol for the spade suit. 
It would be possible to modify a boldface letter in a 
similar manner, for example, by providing internal 
space to produce a standard type font called US. 


New release suggestions 

I believe the manual should include directions for us- 
ing a file which would be supplied by Softcraft. This 
file would have several lines of measured text. The 
user could print these lines using the various fonts he 
wanted. These printed lines would demonstrate the 
amount of space taken by a measured number of 
characters, and would allow formatting the original 
text input to produce the line width desired with a 


minimum of errors. 

I would also like to see some means of modifying 
the line width required from within the text. At pres- 
ent, including a narrower line width in the text causes 
the spreadout of words on the line, while the justifi- 
cation continues to work at the old line width. 


Conclusion 

If you want to produce fast letters and text, you 
should not use Fancy Font. But for really unusual 
presentations, or where the product will be repro- 
duced, it is less expensive to use this process than 
send your material to a typesetter. Although the 
typeset material would be superior, that superiority 
comes at a price, and there are times when the cost is 
not justified. The Fancy Font manual was printed en- 
tirely from copy prepared on an Epsom using Fancy 
Font, so the idea certainly is not impractical. 

The evaluation table below should have one more 
category: evaluation of the results. I did not include 
this item because I feel the results should be evalu- 
ated on two levels: compared to typeset material and 
compared to dot matrix or daisy wheel output. When 
compared to typeset copy, Fancy Font is not as good, 
but, unless you want to settle for the size and fonts 
available with the daisy wheel or the roughness asso- 
ciated with dot matrix, Fancy Font is well worth the 
price. I think it deserves a place among the fine prod- 
ucts available for microcomputers such as Wordstar, 
dBase II, CBasic and Microsoft Basic. 


Fancy Font is more than a system that uses the bit graphics 
of the Epson printers-it is also a text formatter. 


72 Microsystems August 1983 


Fancy Font continued... 


z Overview 
Available from: 
SoftCraft 
8726 S. Sepulveda Blvd., Suite 1641 
Los Angeles, CA 90045 


Price: $180.00 


Currently available only for use on the Epson 
MX, FX and RX series of printers either under 
V/M or for the IBM PC under (MSDOS). 


‘Characters allowed 
per font: 128 


Max. characters per depends upon font 
line input: and character 


Max. size of a 
character: approx. 1” x 1” 
Evaluation on a scale of 1 to 10: 
Documentation: 
Organization for learning .... 
Organization for reference 
Readability 
Includes all needed information 


Ease of use: 
Initial start up 
Setting up your own application 


ta 


WINCHESTER 
DISK DRIVE 
SUBSYSTEMS 


30 Ms. Average Access 
1 Year Parts & Labor 
Warranty 


WINCHESTER DISK 


DRIVE SUBSYSTEMS 


85 Ms. Average Access 
90 Days Parts & Labor 
Warranty 


20 MEGABYTES...$3,333* 5 MEGABYTES...$1,995* 
33 MEGABYTES...$3,750* 10 MEGABYTES...$2,295* 
46 MEGABYTES...$4,416* 15 MEGABYTES...$2,695* 


COMPATIBILITY 
Hardware and Software interfaces for TRS-80® Apple II® 
IBM-PC® CP/M®Turbodos® S-100, any 8 bit parallel port, 
any Z-80® computer such as Osborne®Xerox® Televideo® 
Northstar Advantage® NEC® AVL-Eagle® 

NOTHING ELSE TO BUY 
Subsystems include disk, chassis with power supply, con- 
troller, cables, hardware adapter and software package. 


* SUBSTANTIAL DISCOUNTS AVAILABLE TO QUANTITY BUYERS. 


Fe =| 8720 Old Courthouse Rd. 
ASSOCIATESU Vienna, VA 22180 © 703-281-5762 
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Mix Live Video, 
Digitized Scenes, 


& Color Graphics 


into striking 512x480, 256-color 
presentational graphics displays 


with the MicroAngelo(R) 
Image Tools™ 


SCION GL520 
Gen-Lock/Mix 
Board 


™@ camera, 
VCR, or 
video disk 


SCION CS5080 
MicroAngelo(R) 
Color System 
with multiple 
transparencies 


SCION FG520 
Frame Grabber 
Board, with 
image editing 
software 
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AANA ANNANLL 


AANAANANAANAY 


\\ 


ANANAAAN 


——~ 


pGc-100 5 a Se “hard disk controller 


Konan’s board array of feature- 
packed, versatile controllers makes 
your design decision simple and 
cost-effective. The Konan S-100 con- 
troller line provides you with the 
assurance that you have designea-in 
the high performance and quality 
you demand. And highly qualified, 
technical support and prompt 

deliveries go a long way to ensure 
you ll meet your production schedule... 
on time! The spectrum includes: 


ih) 


< 

G 
“ 
o 
A 
“~ 


ae 


Smc-200 ‘SMD controller” a = — 


The DGC-100 A high performance 
5%" hard disk controller...with full 
sector buffering, error correction, 
automatic flaw mapping...all standard 
features. And the versatile DGC-100 
supports the known spectrum of 
Seagate ST-506 compatible drives. 


The SMC-2004 versatile disk 
controller that interfaces S-100 bus 
microcomputers with all fixed or 
removable media disk drives with 
SMD interfaces. And each SMC-200 
will control up to 2 drives and up 


to 1200 Megabytes...using only one 
bus slot. 


The SMC-100 4 cost-efficient, 
versatile controller that interfaces 
S-100 bus microcomputers with all 
fixed or removable media disk 
drives with SMD interfaces. Each 
SMC-100 will control up to 4 drives 


and up to 2400 Megabytes...using 
only 2 bus slots. 


The Enhancer An intelligent, 


9-track IBM compatible, ¥"' tape and 
high speed printer and reel-to-reel 


es 


SMC- 400 ‘SMD controller ~ 


00 SOLUTIONS 


— 


— z oie onset The Octopus & -pori serial es HO 


IN CONTROL. 


tape controller. The Enhancer inter- 
faces to both Pertec Micro Formatter 
and CDC 92144 compatible tape 
drives. And the Enhancer features an 
8-bit parallel, high speed printer port. 


The Octoplus A versatile, low cost, 
quality solution for multi-user or data 
acquisition systems. The Octoplus 
features selectable serial data rates 
from 110 to 19.2 K Baud, selectable 
real-time interrupts from 3.125 ms 
to 100 ms, and a general purpose, 
8-bit parallel input port. 


For more information on how 
Konanss spectrum of S-100 solutions 
can put you in control...call or write: 


EGE BL Ea” 


ap 
f7i,kRan-jtita-l i 
1448 North 27th Avenue/ Phoenix, Arizona 85009 
(602) 257-1355 
TWX/ TELEX 9109511552 


DGC-100, SMC-200, SMC-100, Enhancer and 
Octoplus are tradenames of Konan Corporation. 
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MICROSYSTEMS REVIEWS THE 


Computime SBC-880 


Single Board Computer 


Another in the Microsystems series of reviews 
on S-100 single-board computers 


by Dave Hardy and Ken Jackson 


ike most Z80-based “‘single-board comput- 

ers,” the Computime SBC-880 has a CPU, 

some on-board RAM and EPROM, and 

serial and parallel I/O. Unlike most SBC’s, 

the SBC-880 does not have a built-in disk 
controller. It uses another board (Computime’s 
UFDC-1 floppy disk controller) for disk I/O. In fact, 
the SBC-880 has only only 2K of RAM and 
EPROM, instead of the usual 64K of RAM and 2K 
or more of EPROM. 

Instead of building all of the functions on one 
board, Computime has chosen to build its SBC on 
two. While this may seem like a step backward (and 
not at all like a single-board computer), it is actually 
a rather unique approach to solving some of the prob- 
lems found in most S-100 computer systems. 

A unique characteristic of the SBC-880 is the abil- 
ity of its on-board RAM and EPROM to exist in the 
same memory space as external (S-100) memory. 
The SBC-880’s on-board memory is given a higher 
priority than external memory, so that whenever the 
processor looks at memory that exists both on-board 
and externally, the on-board memory is the only one 
enabled. This allows the system builder to use vir- 
tually any memory boards available, without regard 
to what memory on the SBC might overlap external 
memory. This feature also allows the SBC-880 to 
work in a “‘dead’’ S-100 system, that is, in a system 
that may have a bad memory or I/O board, or even a 
bus problem. 

The SCB-880 is meant to work in conjunction with 
Computime’s UFDC-1 floppy disk controller and a 
64K RAM board. Since the Computime “single- 
board computer” is actually both the SBC-880 and 
the UFDC-1, this review includes both boards. 


Common features 

Both the SBC-880 and the UFDC-1 are high-quality 
glass-epoxy PC boards, solder masked and silk- 
screened. Both have gold-plated edge connectors and 
are fully socketed, which increases reliability and 
makes IC replacement fast and easy. 


The SBC-880 single-board computer 
The SBC-880 has the following features: 


e Z80 CPU 

e 8253 timer 

e 8251 USART 

e A parallel port (uses 74LS374 octal D 


Dave Hardy, 736 Notre Dame, Grosse Pointe, 
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flip-flops) 
e 1K on-board 2114 RAM 
Up to 2K on-board EPROM (2704, 2708, 2716, 
2516) 
IEEE-696 compatible (8-bit data, 16-bit 
address) 
All memory and I/O can be re-addressed 
Allows external DMA (but none to on-board 
RAM) 
Selectable phantom/power-on jump circuitry 
Selectable MWRT signal 


The SBC-880 is based on a Z80 processor, and can be 
strapped to run at either 2 or 4 MHz. 

The SBC-880 uses one third of its 8253 timer for 
baud rate generation. The remaining two timers are 
available to the user, and may be used under program 
control. 

The on-board serial I/O is provided by an 8251 
USART. To simplify handshaking, Computime 
chose to tie the 8251’s Clear-to-Send line to ground. 
While this makes it easier to connect a simple RS- 
232 device to the USART, it also makes it impossible 
to perform any serial operations that require CTS/ 
RTS handshaking (including BiSynce, etc.). The 8251 
can be run at any standard rate from 110 baud to 
9600 baud. Unfortunately, 19,200 baud is not avail- 
able. 

The on-board parallel port is provided by a pair of 
74LS374 octal D-type flip-flops, and has simple 
handshake capability (strobe and acknowledge). 

Depending on which EPROM you want to use, 
you may have to add another voltage regulator. This 
is not necessary, however, to use the 2716 EPROM 
supplied. 

As mentioned above, the SBC-880 has 1K of on- 
board 2114 RAM and up to 2K of EPROM that can 
safely overlay system (external S-100) RAM because 
of the on-board memory decoding. This feature 
makes it possible to run the SBC-880 with 64K RAM 
boards that do not have provision for “windows” or 
addresses where RAM isn’t allowed. Also, because of 
the on-board decoding scheme used, the on-board 
EPROM and RAM cannot be accessed by any exter- 
nal devices (including Temporary Bus Masters). DIP 
switches are provided to address the RAM and I/O, 
but trace cutting may be required to re-address the 
EPROM. 

In addition to its memory overlaying ability, the 
SBC-880 also will allow its EPROM to be “shad- 
owed” (i.e., turned OFF). This comes in handy when 
you want to run in a 64K RAM environment. Unfor- 
tunately, the EPROM can only be “‘un-shadowed”’ by 


" epee and oe compilers 


TELECON’S C COMPILERS OFFER YOU 
@ FULL C 

@ UNIX* Ver. 7 COMPATABILITY 

@ NO ROYALTIES ON GENERATED CODE 

@ GENERATED CODE IS REENTRANT 

@ C AND ASSEMBLY SOURCE MAY BE INTERMIXED 
@ UPGRADES & SUPPORT FOR 1 YEAR 


IN THESE CONFIGURATIONS: 
TARGET TARGET TARGET TARGET 
= 


200.00 WITHOUT 
a oa 500.00 Scan e 500.00 500.00 
: FLOAT 
* 200.00 WITHOUT 
ee 500.00 500.00 ema 500.00 
THOUT 
PCDOS*/MSDOS* 200.00 “ridat 
er eee 500.00 500.00 500.00 Eau 


Others Pending 
C SOURCE AVAILABLE FOR $2,500 


SO); «IF YOU REREADY TOMOVEUP TO GC... 
CALL 
408-275-1659 


TELECON SYSTEMS 
1155 Meridian Avenue, Suite 218 
San Jose, CA 95125 


* PCDOS is a trademark of IBM CORP. MSDOS is a trademark of MICROSOFT. UNIX is a trademark of BELL LABS. RT-11/RSX-11/PDP-11 is a trademark of Digital Equipment 
Corporation. FLEX/UNIFLEX is a trademark of Technical Systems consultants. CP/M is a trademark of Digital Research. 
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a system reset (or POR). 

Although unable to use the IEEE-696 16-bit data 
path and 24-bit (extended) addressing, the SBC-880 
is otherwise IEEE-696 compatible. The SBC-880 
should be able to work with any IEEE-696 compati- 
ble memory board and, in our tests, performed well 
even with some of the older (non-[EEE-696) dy- 
namic RAM boards, including the SD Sales’ 64K 
and Morrow’s 16K boards. 

Unlike many other SBC’s, the SBC-880 will allow 
external DMA operations to take place; however, its 
memory decoding scheme will not allow DMA with 
any of its on-board memory. 

Several other options are available to’ the user 
when configuring the SBC-880, including power-on 


The Computime SBC-880 board. 


jump with or without phantom, no power-on jump, no 
EPROM, and MWRT generation by CPU or exter- 
nally (or both). 


The UFDC-1 floppy disk controller 
The UFDC-1 has the following features: 


1795 Floppy disk controller IC 

9216 Floppy disk data separator 

Allows any combination of up to four 8’’ and 
5™%!' drives 

Strap-selectable 3-, 6-, 10-, or 15-ms step rate 
1/O port-mapped 

IEEE-696 compatible 


The UFDC-1 is based on the Western Digital 1795 
Floppy Disk Controller IC and uses the Standard 
Microsystems Corp. 9216 Data Separator for both 
read data separation and write precompensation. It 
supports both single- and double-density and single- 
and double-sided floppy disk drives. Disk transfers 
are performed by a “pseudo-DMA” technique using 
CPU wait states. Write precompensation (for tracks 
greater than 43) is fixed at 250 ns (early and late). 

The most outstanding feature of this board is its 
ability to handle both 5%’’ and 8”’ floppy disk drives 
simultaneously. Up to four drives (in any combina- 


tion of densities, size, or number of sides) can be con- 
nected at any time to the UFDC-1 by simply select- 
ing the proper strap settings on the board. In addi- 
tion, the board will also handle the newer 77-TPI and 
96-TPI 5%” floppies. 

The UFDC-1 also allows the step rate to be indi- 
vidually selected for each of its four drives. By setting 
the appropriate jumper, the default step rate for each 
drive can be set at system boot time. 

All controlling I/O is port-mapped. The ports used 
are hard-coded at addresses 98H to 9FH. Changing 
the port addressing of this board would require cut- 
ting traces and possibly adding an IC or two. Inter- 
estingly, the UFDC-1 contains three unused 16-pin 
DIP sockets labeled “SPARE,” which might come in 
handy for this sort of thing. 


Software provided 

Software provided with these boards includes the 
source for the system monitor (which contains the 
BIOS) and source for the disk formatting program. 
The software is written in TDL/Xitan format, so it 
will have to be converted, unless you have a compat- 
ible assembler (like TDLASM, PASM, etc.). 

The source files are well written and fairly well 
commented, and can be used to better your under- 
standing of the operation of the BIOS and monitor. 

The monitor program provided on a 2716 EPROM 
is very much like a debugger program. It boots auto- 
matically at 9600 baud and offers the standard mem- 
ory examination and modification commands. It also 
has commands to read and write to a port, test and 
compare memory, and perform elementary disk oper- 
ations like select drive, move head, read track, etc. 

CP/M is supplied as a more or less standard 64K 
system. Although both the cold-boot and the BIOS 
are contained in EPROM, the BIOS jump table is 
kept in RAM, which means that there are generally 
no ill effects due to the ROM’ed BIOS. Of course, 
BIOS modifications would usually require burning a 
new EPROM. 

The BIOS, as supplied, can read and write 128-, 
256-, 512- and 1024-byte sectors, on 5%" or 8’’ disks, 
single- or double-sided, etc. The BIOS is very versa- 
tile in this respect, due to the way that it determines a 
disk’s characteristics. All in all, it can read at least a 
dozen of the different disk formats currently avail- 
able. 

In the Computime BIOS, instead of reading a disk 
and trying to dynamically determine its density, the 
BIOS reads a disk parameter table (that is incredibly 
similar to CP/M’s Disk Parameter Block) on track 0, 
sector 1 of each disk before it “logs” it in. This makes 
it very easy to read and write a plethora of different 
disk formats and densities. 

The bad part of this method is that it requires that 
a disk absolutely has to have a disk parameter table 
in track 0, sector 1. In other words, there is no way to 
plug in a standard, run-of-the-mill, single-density, 


A unique characteristic of the SBC-880 is the ability 
of its on-board RAM and EPROM fo exist in 
the same memory space as external (S-100) memory. 
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CP/M diskette and read it without either first writ- 
ing a disk parameter table onto it at track 0, sector 1, 
or logging in a similar disk WITH a disk parameter 
table and then fooling CP/M by swapping disks. And 
if you use the “swap disks” method, you can’t write to 
the disk because CP/M will mark the disk as Read 
Only. This is by far the worst flaw in the Computime 
BIOS. In other respects, the BIOS works very well. 


Documentation 

Documentation is provided in the form of two manu- 
als, one for each board. The UFDC-1 manual also 
contains the CP/M documentation, including infor- 
mation on how to bring up your own CP/M, in case 
you bought only the BIOS (and not the CP/M) from 
Computime. 

In general, both manuals are well written and 
complete, and include concise set-up instructions for 
their respective boards. Both manuals include com- 
plete schematics, and quick-reference pages are pro- 
vided for DIP switch and jumper options. 

Each manual includes a general description of its 
board, a functional description, a list of board op- 
tions, and a detailed description that includes the the- 
ory of operation. 

In addition, appendices are furnished that cover, in 
depth, the programming of the 8251 USART, the 
8253 timer, and the 1795 FDC, board addressing, 
and parallel I/O. Also included are sections on using 
non-IEEE-696 dynamic memory and installing a 
printer, as well as how to set up specific disk drives to 
work with the UFDC-1. 

The UFDC-1 manual also has a short trouble- 
shooting section that explains how to use the moni- 
tor’s disk commands to diagnose system and/or disk 
problems. 

Listings of the monitor and BIOS source are ap- 
pended to each manual, in addition to being fur- 
nished on a floppy disk. 


Bringing up the SBC-800 and UFDC-1 
Installing these boards is fairly easy. Read the man- 
uals, set up the jumpers on the SBC-880, set up the 
UFDC-1 for your particular types of drives, plug the 
terminal and floppy drive cables into their respective 
sockets, and power up. Of course, a RAM board 
(preferably 64K) is also required. Both the terminal 
and floppy drive cables are standard, and can be 
readily purchased at a local computer or parts 
store. 

Once the power is on, insert the system disk and 
type “B” to boot, and you are up and running. The 
UFDC-1 manual gives a complete procedure for sys- 
tem start-up and also provides a list of things to check 
if the system won’t boot. The start-up procedure also 
lets you generate a back-up disk, so that you can tuck 
away the master disk in a safe place. 

If you don’t buy your CP/M from Computime, 
they will provide you with a master disk that will in- 


stall your CP/M on their machine. The procedure, as 
documented, is simple, and can be done with just a 
single drive; however, we were unable to successfully 
install our own copy of CP/M, and finally just used 
another system to patch the Computime jump table 
into our CP/M. After that, all was well. 

The monitor comes in very handy for checking var- 
ious system functions when things don’t work as 
planned. Using monitor commands, it is possible to 
check out all memory and I/O, including the floppy 
disk controller board and drives. Because of the pecu- 
liar strapping arrangements of some floppy drives, 
this type of monitor can save hours of trouble- 
shooting. 


Using the boards with 
Computime’s CP/M 


In actual use, the Computime boards were depend- 
able and trouble-free. Although only a lightweight 
heatsink is used for the 5-volt power supply on each 
board, we experienced none of the failures or myste- 
rious “crashes” that usually indicate overheating 
components. In fact, convection cooling (i.e., no 
forced air) seemed to be adequate for both the SBC- 
880 and the UFDC-1, in spite of the fact that many 
of the RAM boards used produced a great deal of 
heat. 

Computime’s implementation of CP/M worked 
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The Computime UFDC-1 floppy disk controller. 


well and seemed reasonably fast (although no speed 
performance measurements were made). BDOS er- 
rors are trapped in the BIOS and give the user the 
option of aborting, retrying, or returning to CP/M 
(which is the normal procedure). The ROM’ed BIOS 
could conceivably cause trouble for some programs 
that try modify it, but the jump table is kept in 
RAM, and we had no problems running various pro- 
grams that like to modify the BIOS jump table. 
The only real problem with the BIOS (as was men- 
tioned previously) is that it requires disk parameter 
tables on track 0, sector 1 of every disk. This can be a 
real pain, especially if you want to do something like 
copy 50 standard single-density CPMUG disks, or 


The most outstanding feature of this board 
is its ability to handle both 5%,’ and 8” 
floppy disk drives simultaneously. 
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TAKE CONTROL 


of your Application! 


MC100 Dual Stepper Motor Controller 


© Independent operation of two four phase motors. 
© On board translators directly drive motors up to 20 w/coil. 
© Universal translator interface to external high power translators. 
@ Programmable step rates and step counter. 
e Automatic limit response with limit display LED. 
e Full software motor ramping control. 
© Dual 4 bit parallel ports which can be a single 8 bit port. 
© Optional manual control panel (shown above). 
® Optional CP/M and CDOS compatible driver software. 
CP/M is trademark of Digital Research; CDOS is trademark of CROMEMCO 


MC100 controller board with documentation...............05 $350.00 
MC102 manual control panel with 6 ft. cable................ $135.00 
MC104 driver software with documentation................. $ 35.00 
MC110 includes MC100, MC102, MC104................. $499.00 


fe 
‘47% SNOW MICRO 
/4\ SYSTEMS, INC. 


P.O. Box 2201 Fairfax, VA 22031 (703) 378-7257 
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$30 SOLVES 


FOR CP/M 2.2 
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a: 


@ Redirectable I/O. 


Amanuensis, Inc. 

R. D. #1 Box 236 
Grindstone, Pa. 15442 
(412) 785-2806 
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Qbax TM Amanuensis, Inc. 
CP/M Registered TM Digital Research 
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THE BACKUP PROBLEM 


Qbax is a revolutionary new backup program which 
saves huge amounts of time for users of either floppies 
or hard disks by copying only files which have changed. 


Incremental backup for CP/M 2.2 MH Copies only files 
rewritten since the last backup Mi Handles multiple 
backups Ml Change or report the backup status of files 


8” SSSD& 
popular 5%” formats 
OEM inquiries invited 
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read any disks not generated with the SBC-880 and 
UFDC-1. This problem could be cured by making a 
few simple changes to the BIOS, but unfortunately, 
the BIOS is in EPROM, so changing it might require 
burning a new EPROM. 


Conclusion 

Although actually built on three boards instead of 
one (CPU+I/O, FDC, RAM), the Computime 
SBC-880 and FDC-1 performed well, and offered the 
additional advantage of being able to run both 5%” 
and 8” drives simultaneously. The “‘overlayed” on- 
board RAM and EPROM make troubleshooting 
easy, even ina ‘“‘dead’”’ S-100 machine. Except for the 
inconvenience of not being able to directly read and 
write disks written on other machines, the software 
provided is very good. 

The SBC-880 and UFDC-1 boards used in this re- 
view were provided by the east coast distributor of 
Computime boards, GSR Computers Maspeth, NY, 
and are available from them for $325 each (assem- 
bled and tested). 

Our tests were performed using only 8” single- and 
double-sided drives, and 5%’’ single-sided drives. 

Prices: SBC-880: $375 A&T, $245 kit, $60 bare 
board; FDC UFDC-1: $275 A&T, $245 kit, $45 bare 
board. For further information contact: 


Computime 

8614 Hamilton Ave. 
Huntington Beach, CA 92646 
(714) 536-5000 


MicroScript $99 
State of the Art Text Formatter 


© generic markup 

¢ fully definable page with multiple columns 

¢ multiline headers, footers, and footnotes 

© automatic widow and orphan suppression 

* automatic section numbering 

¢ automatic table of contents and index 

¢ automatic bullet, number, and definition lists 
¢ floating figures 

* text alignment to left, center, right, or justify 
¢ left and right indention with delay and duration 
¢ bold, underscore, and proportional spacing 

* macros and symbols 

* multiple input files of unlimited size 

© direct printer controi 

e IDS, Qume, Diablo, NEC, C.ITOH, and all TTY 


MicroEd™ $49 


Customizable Full Screen Editor 


e full cursor control by character, word, or line 
* position to top or bottom of window or file 
@ ccroll by line, half window, or full window 

¢ global or selective find and replace 

¢ delete by character, word, line, or block 

¢ read external files into current file 

© copy, move, and write blocks of text 

¢ insert, overlay, or wordwrap text 

¢ all cursor addressable VDTs 


Postpaid within U.S, outside U.S. add $10, CA residents add 6% 
8” SS/SD CP/M-80*, and CP/M-86", 5.25” SS/DD PC-DOS 


Microlype 


6531 Crown Blvd., Suite 3A, San Jose, CA 95120 
(408) 997-5026 


™ 


is a trademark of IBM Corporation. 
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CP/M-80, CP/M-86 are trademarks of Digital Research, PC-DOS 


RE After 12 years work on main- 
frames and micros, | must say this 
machine is the finest piece of end- 
user engineering | have seen. RF 


“We waited several years for a system 
integrating the 68000 with UNIX” Several 
tempting alternatives appeared along the way, 
particularly the Z-8000, the 8086 and ersatz 
UNIX™ Operating Systems. 


The quality of construction, S-100 bus 
architecture and ease of service were the 
factors that led us to prefer your system. 


It was worth the wait. 


The part | enjoy the most about the Dual 
System 83 is demonstrating it to academics 
who are used to comparable DEC systems, 
costing three times as much’ 


Dr. Leland Wilkinson 
University of Illinois, Chicago 


October 20, 1982 


=UAL. 


DUAL SYSTEMS CORPORATION 
2530 San Pablo Avenue, Berkeley, CA 94702 (415) 549-3854 172029 SPX 


SYSTEM 83/20 MC68000, full UNIX 20-slot motherboard, IEEE 696/S-100, 10 MHz, from 516 KB to 
3.25 MB of parity RAM, 20 MB storage, 4 to 6 users. 
SYSTEM 83/80 All system 83/20 features except 80 MB to 168 MB storage, expandable to 1200 MB, 
8 users. Includes DUALS proprietary SMD controller producing superior speed over 
other UNIX™ systems. 
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UNIX is a trademark of Bell Laboratories, Inc. 


ARE YOU DROWNING 


IN A SEA OF SOLUTIONS? 


Recognize the symptoms? 


Applications backlog? Technology biur? 
Mounting user pressures? 


You suspect that suppliers may 
have answers to your pressing 
problems, but you don’t have 
enough time to sort through frag- 
mented information to determine 
what will really work for you. 

Like the shoemaker’s kid who 
goes barefoot, you (of all people) 
need a system. An information 
system that displays all your cur- 
rent software, hardware and com- 
munications options for instant 
reference. 

That system is DATA 
SOURCES, and you’re invited to 
make it work for you. Simply fill in 
the coupon and we'll send you 
DATA SOURCES at 50% off its 
regular cover price. 

What DATA SOURCES 
does is organize your options. It 
guarantees that you've considered 
all relevant products. And makes 
the most of your time for product 
evaluations by guiding you to 
those with the best possibility of 
success. 

DATA SOURCES is a con- 
veniently sized, extremely well- 
organized and skillfully indexed 
reference...maintained on a data- 
base, constantly updated and pub- 
lished quarterly. 


YOU GET... 


Hardware—Over 12,000 products from 
Micros to Mainframes including periph- 
erals—terminals, printers, memory de- 
vices, etc...organized by systems com- 
patibility. 

Seftware—The largest available inven- 
tory of business packages for micros, minis, 
and mainframes including operating sys- 
tems, utilities, and application packages. 


Communications Equipment— 
from modems and multiplexors to local net- 
works, carriers and services. Quick refer- 
ence comparison charts, plus all diagnostic 
and test equipment. 


Services, Suppliers, Support— 
Most complete organized listing of sup- 
pliers from installation design to mainte- 
nance and data center operations. 
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READ WHAT USERS SAY... 


“...Current and comprehensive listings are be- 
coming indispensable.” 


Gary Yost 
Marketing Services Director 
ASK Computer Systems, Inc. 


“Literally use it daily...dramatically shortens 

research time.. provides more alternatives than 
would have been known or considered.” 

Curt Flatness, V.P. 

Logic, Inc. 
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Is uid 


“Answer to a Systems Integrator’ prayer...very 
effective for locating the equipment we need 
...using it for everything from single-user sys- 
tems to systems interfacing with mainframes.” 


Richard Fletcher, President 
Micro Computer Adaptation Procedure 


“Dependable source of information otherwise un- 
obtainable or costly to obtain...” 


Barry Kukes, President 
RSI Repair Service, Inc. 


NEW FEATURES... 

M Quick-reference product comparison charts. 

Y Market-tracking trends of new DP products. 

/ Before-you-buy selection criteria and checklist. 


~ Geographical listing of vendors offering on-site 
and depot maintenance. 


ORDER NOW AND SAVE 50% 


Yes! Rush me the latest two-volume edition of DATA SOURCES and enter my subscription 
at $60.00 for 4 quarterly editions. I save a full 50% off the regular $120.00 cover price. 


Name 


Title 


Company 
Address 
City 


State Zip 


Telephone 
Nature of Company’s Business 


Please check appropriate box: [J] END USER [] VAR/OEM [ DISTRIBUTOR 


DPMFG [J OTHER 


An information product of Ziff-Davis Publishing Company. Satisfaction guaranteed. 


Return coupon to: 


Pe EY 


P.O. Box 5845. Cherry Hill, N.J. 
Residents of Ca., Co., Ct., D.C., Fl., Il., Ma., Mi., Mo., N.J., N.Y., Vt., please add applicable state taxes. 
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Logging-On CP/M 


by Ralph J. Jannelli 


his simple program allows a degree of se- 
curity to multiuser CP/M systems. It op- 
erates in a manner that simulates log-on/ 
log-off procedures found in minicomputer 
operating systems, and is intended to be 
used in conjunction with the CP/M enhancements 
described in my article “Enchancing CP/M 2.2” 
(Microsystems, March/April 1982). 

On a cold start, CP/M signs on in a normal man- 
ner (i.e., disk A: user 0). This user directory (directo- 
ry 0) should be designated to the system operator. All 
common user files reside in this directory. When the 
system operator is finished with any required system 
start-up procedures, he simply types ‘BYE’ followed 
by a carriage return. Once the BYE program is 
loaded, it searches user 0 directory (system directo- 
ry) of the currently logged disk for the file PASS- 
WORD.DAT. 

If the password file is not found, an error message 
is sent to the console and control is returned to CP/ 
M. If the password file is found, it is loaded into 
memory so the user name/password pair entered by 
the user can be matched against the contents of the 
PASSWORD.DAT file. Now any other system us- 


Ralph J. Jannelli, 101 Cottonwood Dr., Jamestown, 
NC 27282 


CP/ 


ers, including the system operator, must log on. 
The BYE program sends the following prompt to 
the console when it is waiting for a user to log on: 


"ENTER ANY KEY TO BEGIN LOGON 
PROCEDURE" 


When a user comes up to the console, he must enter a 
key from the keyboard. The program now knows 
someone is ready to log on. The next step is to enter 
the user name previously assigned to the user by the 
system operator. The program prompts with: 


"ENTER USER NAME :" 


The user then enters his user name. This can be any 
letter or number keys or a combination of letter and 
number keys. The maximum length of the user name 
is 10 characters. If a typing error occurs while en- 
tering the user name, it can be corrected by using the 
normal CP/M command line edit keys (i.e., back- 
space, rubout, control U, etc.). The user name entry 
is terminated by a carriage return. The program then 
asks for the password: 


"ENTER PASSWORD 3" 


The password is a four-character field. Typographi- 
cal errors are not allowed in entering the password. 
As each character is entered, a question mark is 
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Fully configured hard disk development systems, based on CompuPro hardware, are now available from Gifford Computer 
Systems. The total price with hardware and software? Only $9990. All you need is an RS-232 terminal to be up and running. 
Each system is covered by a two year, 24 hour replacement warranty. Systems are available for delivery now. 


Hardware 

0 8 MHz Motorola MC68000™ CPU 
0 256K high speed static RAM 

0) 2.4 Mbyte floppy disk storage 

O21 Mbyte formatted Winchester disk 
0 9 serial ports 

O Real time clock/calendar 

0 20 slot IEEE 696/S-100 motherboard 


Upgrades for CompuPro based computers. 


CO CompuPro™ 68000 CPU (8 MHz)............. 
0 CP/M-68K™ from Digital Research............ 


0 20 Mbyte Winchester disk subsystem with 
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CP/M is a registered trademark of Digital Research. CP/M-68K is a trademark of Digital 
Research. MC68000 is a trademark of Motorola. Mince is a trademark of Mark of the Unicorn. 


CompuPro is a trademark of Godbout Electronics. 


] 1922 Republic Avenue, San Leandro, CA 94577 i 
(415) 895-0798 A division of G&G Engineering 
$ 850.00 
| I'D LIKE THE WHOLE STORY. i 
$ 350.00 Please send me your brochure. 
Nante SS eh > ae iia ate: ] 
Organization 
$3,595.00 I Address | 
ibys eek) oat State Zip 
Phone | 


Software 

C1) CP/M-68K™ from Digital Research 

1 C compiler from Digital Research 

C1) 68000 assembler from Digital Research 


QO Mince visual editor from Mark of the Unicorn 
| PRS Se RE wor TR IE | 


O Please have a representative call me. 
Ce en 


L. 
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Logging-On CP/M continued... . 


3A bi Cy 77 C3 96 seek 
2 C5 Ca uS CE 3 | ee”? ES 
¥ c 


6 23 35 29 US 
« £6 C 
6 77 13-0 


O° My 16 1S 
é 


$425 25 G1 0 ” 
Sb 8s 79 Fo 86 Dd il Ce Cé £5 GA 1A be C2 4F 
Figure 1 


echoed to the terminal. This prevents any on-lookers 
from gaining access to the user’s password. If the 
user name/password pair does not match any of the 
entries loaded from the PASSWORD.DAT file, this 
message is displayed on the console: 


"INVALID USER NAME - PASSWORD 
PAIR" 


After three consecutive invalid log-on attempts, the 
following message is displayed: 


"TOO MANY TRIES--CONSOLE LOCKING 
UP FOR 3 S®8CONDS" 


At this point the program enters a software loop and 
times out approximately 30 seconds. The loop count 
is set up to run on a 2.5 MHz Z80 processor. The loop 
can be modified to accommodate for faster or slower 
clock rates as shown in the program listing. The pur- 
pose of the console lockout is to frustrate attempts by 
unauthorized users to break the system security 
through trial and error. A successful log-on results in 
control being returned to CP/M, with the user num- 
ber corresponding to the positional location of the 
user name/password pair in the PASSWORD.DAT 
file (i.e., if the fourth entry in the file is RALPH— 
1234, then the user number will be 4). See Figure 2 
for examples. 

When the user is done, he types BYE followed by a 
carriage return, and the process is repeated for the 
next user. 

As added security, your copy of CP/M should be 
further modified to remove the USER command. 
This can be accomplished quite easily. Execute 
MOVCPM for your memory size as outlined in the 


AHOY! 


The following products are now available through S.A.I.L. to enhance your 


CP/M or NorthStar® system — 


S.E.A.S. - CP/M compatible operating system for NorthStar® Horizon and 


NorthStar® Advantage. 


S.A.1.L.B.0.A.T. - NorthStar® compatible 280 BASIC for CP/M. 


$70.00 
$70.00 


NorthStar® Horizon owners — contact us about octal 
Capacity floppy subsystems and 5 megabyte removable 


hard disk subsystems. 


S.A.1.L. SOFTWARE 


86 W. UNIVERSITY, SUITE 14 
MESA, ARIZONA 85201 


(602) 962-1876 


CP/M Is a registered trademark of DIGITAL 
RESEARCH 


S.A.1.L.B.0.A.T. is a registered trademark ot 
S.A.L.L. SOFTWARE 


Z80 is a registered trademark of ZILOG 
DEALER INQUIRIES INVITED 
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OA>BYE 


ENTER ANY KEY TO BEGIN LOGON 
UNTER USER NAME : ONE 

ENTER PASSWOKD : 27??? 

LADGYE 


ENTER ANY KEY TO BEGIN LOGON 
ENTER USER NAvié 3 PIPTELN 
EWTER PASS#OKD ¢: 

L5SA>bYe 


ENTER ANY KeY TO BEGIN LOGON 
ENTER USER NAME ; JOE 
ENTER PASSWORD =: ??7?? 
INVALID USER NAmE - PASSWORD 
ENVERK USER NAME +: PETE 
ENTER PASSAORD : 2??? 
IAVALIO USER NAKiE - PASSWORD 
ENTER USER NAME : SAM 
ENTER PASSWORE : 7??? 
INVALID USER NaMé - PASS*ORD 


Logging-On CP/M continued . 


PROCEDURE 


PROCEDURE 


PROCEDURE 


PAIR 


PAIK 


PAIR 


TOO MANY TRIES--CONSOLE LOCKING UP FOR 39 SECONDS 


ENTER ANY KEY TO EEGIN LOGON 


PROCEDURE 


ENTER USER NAME =: OP 
ENTER PASSWORD : 2??? 
DA> 


Figure 2 


Digital Research manuals. Then SAVE it to the disk. 
Next load the file under DDT and display memory at 
0COO using the D(isplay) command: It should look 
like Figure 1. To remove the USER command use 
S(et) to write zeros at locations OCA4 thru 0CA7, as 
also shown in Figure 1. Now exit DDT and SAVE 
the modified CP/M image back to the disk. The 
modified version can now be SYSGENed. Any at- 
tempt at invoking USER when the system has been 


GET THE BEST OUT OF CP/M: 


booted from this disk will be in vain. Note this 
change only removes the ability of the CCP to change 
user directories. BDOS calls to function 32 by appli- 
cation programs will still change user directories as 
before. 


Figure 3 


WITH WAVE MATE’S 2224247 


* Cost €ffective 

© Highest Performance of any 
4MHZ Z80 Board 

e 128 K Usable RAM 

© €nhanced Software to 
Optimize CP/M 

e DMA Track Buffered Disk 
Controller 

© Only 8 x 10.7 inches in size 

Power only 5v @ 1.5. 

Use any Serial Terminal and 

Centronics compatible printer 

* Capable of supporting MP/M 


WAVE MATE INC. 

14009 S. Crenshaw Blvd. 
Hawthorne, CA 90250 

(213) 978-8600 Telex: 194369 


NY 


(4) Printer/Winch Port 
(2) Printer Conn. 

(3) Winch. Conn. 

(4) Exp. Data Bus 

(5) CPU Chip 

(6) DMA Chip 

(7) Power 

(8) Clock Timer Cont. 
(9) First Serial Port 
(0) 2nd Serial Port 
(11) DART 

(12) Charge Pump 

(3) 128K RAM 

(4) Data Separator 
(15) Boot Disk Setter 
(6) Floppy Disk Contr. 
(7) 50" Floppy Conn. 
(8) 8"' Floppy Conn. 


WAVE MATE INTERNATIONAL 
159 Chee de Vieurgat 

1050 Brussels, Belgium 

Tel: (02) 649 10 70 Telex: 24050 
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inued 


= 
fe) 
Oo 
= 
= 
oa 
cs) 
£ 
° 
D 
iS 


Logg 


Preparing the PASSWORD.DAT file 


MALNNOD AYLI LNaWSUNOAaG! 


MIOSNOD OL AOVSSIW GITIVANI 
GNIS GNNOd HOLVW ON aI! 
AULNT LXIN ANL GNWV wWOowd OD! 
HOuVSS OL LAST 

SAIULNG 

JO YSGWAN INSwaHoga anv! 


AULNA LXAIN OL LNIOd asia! 


dwarf GaHOLVYW SAIULNA al! 

93yu ga 

A@ OL GAILNIOd AULNA AVE, 
CL AULNA YASN SauvdWwOD LSA! 


ugsn ka 

GguaLNI YIVd OL Gd LNICd! 
AULNA ATAVL 

40 HLONAT HLIM 0 ave! 
SAINLNA ATGWL 

JO YdsWKAN HLIM @ avot! 
SHIVd GYOMSSWd NV GWYN 
MaASN JC ATGVL OL Lniodd! 
LNNOD 

UALOVSVHD AHL SGIOH Dau a? 


The system operator should assign a user directory to 
each user of the system and give a user name/pass- 
word pair to the user. The PASSWORD.DAT file 
can be prepared using any standard text editor or 
word processor. Each entry is terminated by a car- 
riage return and linefeed and consists of 14 charac- 
ters. The first 10 characters are the user name; this 
field must be padded with spaces to make up 10 char- 
acters. The last four characters are the password; see 
the example in Figure 3. The first entry corresponds 
to user directory 0, the second to user directory 1, and 
so on up to directory 15. 


As a precautionary measure both the BYE.COM 


and PASSWORD.DAT files should be given “read 


WLOAUL 
soas 
6‘9 


€NoD0T‘ a 
HOUVIS 


a 
a 
9T‘d 
H 


HOLVW 
LSA 

H 
7+ANAWWN ‘Gd 
tes) 

9t’a 
181SSd/H 


d1ssvd 
4 


I hope some of you will find this program useful. I 
have used it on a system supported by a 1OMB Win- 


only” and “system” attributes using the STAT com- 
chester disk with excellent results. 


mand as described in the standard CP/M documen- 
tation. This will keep users from knowing of their ex- 
istence, since system files will not show up in a DIR 
display, even if a user does manage to gain access to 


the system directory. 


anassSd NI 
NOTLSOd LXEN OL H LNAWAYONI * 
JNACSA NI YILOVYVHD FAVS! 


MaGOWYVHO ANO SID HHOLIO! 
=d1SSVvd 


ANASSd OL SYALOVYVHD NNOA 139! 


A'IOSNOD 

OL LdWioud ayomssvd anas? ZNOLOT‘ A 
S3ovdS IIOSV HLIM aANaWwyN 

dO NOTLYGd ONINIVWAUN TIIa! anatia 

ANGWYN‘H 

soaq 

share) 

ANGAWVYN OL 3WVN YASN LNANT! ANIWvN‘ Gd 

: soa 

?HOUVAS 6’ 
: AIOSNOD OL 

LdWoud AWVN Y¥aASN anas* TNo901‘d 

soag 


’ 


ONICNILNOD 3xOdad 
STOSNOD AHL WONT ATA WV LMdnt! ee) 
soaa 
6/9 
JIOSNOD FHL 
OL LdWoNd NOSOT AHL anas?! Ldwoud’a 
MLOAUL 
MAGWNCS AMLAY AHL dn Las? AULAY ‘WY 
SUIWd GUOMSSWd dWWN YaSN 
SHL SNIVLNOD LvG*aduomssvd 
GTId LVG°auOMSSvd NI avau! ss¥dL9 
soaa 
hac | 
6 OL UAGWAN YASN LAS! cet 
YOWLS WOOT dn-Las * WOWLS‘ dS 
JAVSAS NOILVOOT NI! SAWSAS 
dS 


UILNTIOd YOWLS w/dd aAvS! 6'H 


Vd JO ONINNTOAS ¢ HOOT 


SUNdD0 dN-4%901 3IOSNOD 
AYCIAG GAMOTIV SAIULAN JO Uudawnn! € 
ZHW S*Z) SONOOTS OE *XO'UddW = BS 
AW LNONDOT ATIOSNGD NOM ANIVA! os 
NOILVOOT Luvs wuiwm! it) 
SOdd OLNI NOTLVYDOT AULNS! S 
agaadq cnId TIosv! ive 
NUNLIY BOVINUVD IIOsv! Hap 


WVad90Nd GYOMSSVd YASN W/dd 


Microsystems August 1983 


86 


L8 


TRYCTR 
LOGON 


D,TMSG 


; 
; 
i 
; 
i 
; 
i 


; 
MATCH: 


ERROR: 


FILBUE: 


M, 200 
HI 
E 


7IF LESS THEN THREE TRIES GETCHR: 
LET HIM TRY AGAIN 
7;ELSE SEND LOCK-UP MESSAGE 


7H=0 

;LOAD B WITH TIME OUT VALUE 
;DECREMENT H UNTIL ZERO 
7THIS LOOP DELAYS APPROX. 
253 MS. @2.5 MHZ TO FIND 
DELAY FOR OTHER CLOCK FREQ. 
MULTIPLY 1.573 X (CLOCK RATE 
IN MICRO-SECONDS) = DELAY 
TIME IN MILLI-SECONDS i.e. 
1.573 x .4 = .6292 MILLI- 
SECONDS 


;IF TOUT=50 TOTAL LOOP TIME 
APPROX. 31.5 SECONDS 

‘ 
;AFTER LOCK-UP LET USER TRY 
AGAIN ; 
;IF MATCH OCCURS B REG HOLDS 
15 MINUS TABLE ENTRY OF MATCI! GTPASS: 
COMPLIMENT THAT NUMBER 
; INCREMENT IT 
;GeT RID OF HIGH FOUR BITS 
;1T EQUALS USER NUMBER OF 
MATCHED ENTRY 
;SET USER NUMBER 


;RESTORE CP/M STACK POINTER 


;RETURN TO CP/M 
7 IF PASSWORD.DAT FILE NOT FOUND 
7SEND ERROR MESSAGE TO CONSOLE 


7oht MAX BUFF LENGTH 
;PLUS ONE 
7SAVE IN & REG. 


;GET ACTUAL LENGTH 
;PLUS ONE 
;SAVE IN & REG. 


7ADD ACTUAL LENGTh PLUS ONE 

TO HL. SO HL NOW POINTS TO 
FIRST ONE USED LOCATION IN 
‘BUFFER 


Fp Se se se Se se se se we 


CB1l: 


see 


7 IP CURRENT POS. IS MAX LENGTH 
PLUS 

ONE THEN RETURN 

7ELSE FILL WITH ASCII SPACE 
7BUMP POINTERS 


DATA AREA 


D,FCB1 
c,15 
BDOS 
OFFH 
ERROR 


D,PSSTBL 
C,26 

BDOoSs 

D,FCB1 

C,20 

BDOS 
D,PSSTBL+128 


C,26 
BDOS 
bD,FCRBL 
C,20 
BDOS 


0 


7 CONTINUE 
7 INPUY A CHARACTER 
;USING DIRECT CONSOLE I/0 


;IF ZERO RETURNED ‘THEN CHA 
NOT READY ; 
;SAVE CHAR ON STACK : 
7;SEND A QUESTION MARK FOR EACH 
;CHARACTER INPUT 


7;GET CHAR BACK TO A REG 

7 RETURN 

7GET USER ENTRY CHARACTER TO 
A REG 

;COMPARE IT TO TABLE ENTRY 
7IF NO MATCH THEN RETURN 

7IF MATCH THEN BUMP POINTERS 


7C REG HAS LENGTH OF FIELD 
sIF C NO ZERO THEN THERE IS 
MORE TO DO 

7IF ALL MATCHED RETURN WITLI 
A REG = @ 


;OPEN FILE 
; PASSWORD. DAT 


;CHECK FOR SUCESSFUL OPEN 
71F NOT THEN DISPLAY ERROR 
MESSAGE 

7SET DMA TO PSSTBL 


;READ PASSWORD.DAT INTO PSSTS8L 


;TABLE IS 256 BYTES LONG SO 
READ 
7TWO SECTORS 


7;JUMP HERE CAUSES BDOS TO 
RETURN TO ROUTINE THAT 
CALLED GTPASS 


FILE CONTROL BLOCK FOR PASSWORD.DAT 


7IF ZERO HERE SEARCH CURRENTLY 
LOGGED DRIVE, IF A ONE PLACED 
HERE WILL SEARCH DRIVE A: 


‘ * * DeNUUCS W/d9 4uo-6ul6604 


Logging-On CP/M continued... 


TH OF NAMBUF 


S 
; RESERVE STORAGE FOR USER NAME 


BUFFER 
; RESERVE ROOM FOR LOCAL STACK 


;RESERVE STORAGE FOR PASSWORD 


= 
& 
oO 
Zz 
<3] 
i) 
a 
wo 
oo 
i] 
2 
ie) 
x 
< 
= 


7MAX LEN 


ENTER USER NAME 


UP FOR 3@ SECONDS' 


tse 


CR,LF,"ENTER ANY KEY TO BEGIN LOGON PROCEDURE' 
' 


'$ 
CR,LF," INVALID USER NAME - PASSWORD PAIR' 


CR,LF,'TOO MANY TRIES--CONSOLE LOCKING‘ 


CR,LF,"ENTEK PASSWORI) 
CR,LF,' FILE PASSWORD.DAT NOT FOUND','S' 


' 
CR,.LF, 

$? 

$ 
LAST + 128 


D 

DB 
DB 
DB 
D 

DS 
DS 


;SECOND BYTE FILLED IN BY CP/M AS TO NUMBER OF BYTES ACTUALLY 


;READ LAST 10 BYTES ACTUAL DATA STORAGE 
;BUFFER FOR PASSWORD MUST FOLLOW NAMEBUF IN MEMORY 


;FOR SEARCH TO WORK CORRECTLY 
;STORAGE FOR USER NAME - PASSWORD PAIRS READ IN FROM 


; STORAGE AREA FOR CP/M S'TACK POINTER 
; FILE PASSWORD.DAT 


;BUFFER FOR USER NAME FIKST BYTE 


7;STORAGE FOR TRY COUNTER 
;PUT THE LOCAL STACK 


PROMPT: 
ERRMSG: 
; 
; 
TRYCTR: 


PSSBUF: 
LOGON2: 
LOGON3 


i 
i 
i 
i 
i 


Now you can organize your copies of 
MICROSYSTEMS 


Now your magazines can be a handsome addition to your decor, 
well organized, and easy to find, thanks to these durable li- 
brary-quality cases or binders. They're made of luxury-look 
leatherette over high-quality binder board. And both styles are 
custom-designed for this or any other magazine you save, with 
size, color and imprint selected by the publisher. FREE transfer 
foil included for marking dates and volumes. 


. * «*» For faster service, 
Magazine binders, 4°r3, CALL TOLL-FREE 800-526-0790 
* In NJ only 201-540-0445) 
_ Says Q-PRO4 user, | _--_—_— eels -_-_—_— eo 
Richard Pedrelli, President | l Microsystems 7 


Quantum Systems, Atlanta, GA 


&& As a dBASE|l beta test site the past two years, we 
were reluctant to even try Q-PRO4. Now we write all our 
commercial applications in Q-PRO4. We find it to be an 
order of magnitude more powerful than dBASEII. 


P.O. Box $120, Philadelphia, PA 19141 


Please send: [] Cases [_] Binders 
TITLE QUANTITY 


Microsystems 


| 
| | 
| | 
| othe | 
Q-PRO4’s 4th generation syntax is so efficient, we | Stes: | 
now complete complex jobs in weeks instead of months. holds your issues on ( PAYMENT ENCLOSED $________* Add 
Superb error trap and help screen capabilities make our alive Nal Sea | $1.00 per order for postage and handling, Out- | 
finished applications far more user friendly. And our aeons 3748 cack | pected add $2.50 per unit ordered; send US | 
programs run much faster, too. 3 for $22.50 6 for $42.96 fandsonly, 
. ‘ rn . ixed titles OK for quan | () CHARGE (Minimum $10) | 
In my estimation, any application programmer still tity prices [J American Express [] MasterCard 
using outdated 3rd generation data base managers or oO ees | Visa PRESS: Ld) aeSTS | 
worse, a 2nd generation language like BASIC, is ripping pen-nack cases 
himself off. 99 | Card No_______ Exp. Date | 
Q-PRO 4 - $395. Ask about FREE trial offer. Call (215) 968-5966 | Signature | 
Runs on 8 bit micros with CP/M, MP/M, TurboDOS™, MmmOST. | Print Name | 
Author's lock up package available. ate Nee 
Quic-n-easi products inc feaeg | 
Se City. | 
136 Granite Hill Court, Langhorne, PA 19047 (215) 968-5966 store your issues forindivid- | state/Zip | 
CP/M and MPIM are registered trademarks of Digital Research, TurboDOS is a trademark of Software 2000, inc., for $19.75, for $37 50, Maxed *Residents of PA add 6% sales tax. al 
MmmOST is a trademark of Tele Video. dBASE |! is a registered trademark of Ashton-Tate, Inc. titles OK for quantity TRICO RN faa a ee a pe ee oO 
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UNIPROM 


THE VERSATILE EPROM HANDLER 
Reads programs 2704, 2708, 2758, 2508, 2516, 2716 (1supply) 
2532, 2732, INTEL’S 2732A and the 8755A (INTEL/NEC). 
¢Reads/erases/programs Hitachi 48016 EEPROM’S 

*No personality modules required. 

¢All signals are S-100 compatible (can adapt to most other buses) 

Port mapping occupies NO memory space. 

Bus clock rates exceeding 6mhz. 

¢All software is 8080/8085/Z80 compatible. 

* Software “user” friendly. 

* All software is fully CP/M® & CDOS compatible. 
Board (A&T) with extensive documentation .. 
Disk software (8” or NORTHSTAR 5.25”) 
EPROM-based software with source listing ... 
EAR enman: console - dake 


$199.00 


MENCO 
TAL RESEARCH IN 


9! 
NORTHSTAR 1s a regi Jemork of NORTHSTAR COMPUTER. INC 


Featured in July, August '82 Microsystems 


Er CER -TEK 


6020 Doniphan (915) 581-6697 El Paso, TX 79932 
ELECTRONICS MANUFACTURING SINCE 1975 
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BDS C 


The fastest CP/M-80 C 
compiler you can get 


Version 1.5 contains some nifty improvements: 

The unscrambled, comprehensive new User's 
Guide comes complete with tutorials, hints, error 
message explanations and an index. 

The CDB symbolic debugger is a valuable new 
tool, written in C and included in source form. De- 
bug with it, and /earn from it. 

Hard disk users: You can finally organize your file 
directories sensibly. During compilation, take ad- 
vantage of the new path searching ability for all 
compiler/linker system files. And at run-time, the 
enhanced file 1/O mechanism recognized user 
numbers as part of simple filenames, so you can 
manipulate files located anywhere on your system. 


Lill 


LM 


TET TTTI OTe, 


BDS C’s powerful original features include dy- 
namic overlays, full library and run-time package 
source code (to allow customized run-time environ- 
ments, such as for execution in ROM), plenty of 
both utilitarian and recreational sample programs, 
and speed. BDS C takes less time to compile and 
link programs than any other C compiler around. 
And the execution speed of that compiled code is 
typically lightning fast, as the Sieve of Eratosthenes 
benchmark illustrates. (Gee the January 1963 


BYTE, pg. 303). 


BD Software 
P.O. Box 9 


A AT PAA AP AF AA AP AYA A AAA AAA AAP AAA AAA AA 


8” SSSD format, $150 

Free shipping on pre-paid orders 
Brighton, MA 02135 Call or write for availability on 
(617) 782-0836 other disk formats 


Cheidk ttt ttttitittiif iit 
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NFORMATION MANAGEMENT 


DBPACK - Data Base Management: Indexing, 
Sort & Search, Tabulation, Address Labels, 
Word Processor Interfaces, and lots more! 


FILER - Files Compression, Archiving and 
Cataloging: Substantial Disk Space Savings; 
Date-stamping & Descriptive Comments ... 


COMMUNICATION SOFTWARE 


COMCOM - Communication Program: Communi- 
cate with Time-sharing systems and other 
computers; Advanced Features; Easy to Use. 


CPMCPM - File Transfer Program: Transfer 
Files (any type) between different CP/M-based 


A> For CP/M® Computers 


CP/M is a registered trademark of Digital — 


ry eer ae eae 


COMPU-DRAW 
1227 Goler House 
Rochester, NY 14620 
Phone: (716)-454-3188 


inquiries 
invited 


ara 7 

MasterCard, Visa & American Express cards welcome. 

Separately ordered documentation may be returned 
for full refund within 10 days? 


ANNOUNCING 
™ C COMPILER 


THE C 
—THE COMPILER THAT SPEAKS 
THE LANGUAGE OF THE FUTURE! 


Kernighan and Ritchie’s book, The C-Programming Language, is 
the key source for C. Just as fundamental is the C86 ™ C 
Compiler. 

The C86 ™ C Compiler is especially designed for the IBM® 
Personal, IBM® Display Writer, CP/M-86° and MS-DOS® . 

For further information on the C-programming language 

and the C86 ...C Compiler, please contact: 


Computer Innovations, Inc. 
75 Pine Street 

Lincroft, New Jersey 07738 
Telephone: (201) 530-0995 


C86 15 a trademark of Computer Innovations, Inc , CP/M-86 
18 a trademark of Digital Research, |BM and MS-DOS are 
fegistered trademarks of International Business 

Machines, inc 
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WordMaster Patches for WordStar 
Compatibility and Date/Time 


by Jim Gilbreath 


icroPro International’s Word Master is a 

popular screen editor for the CP/M-80 

environment. It is small, fast, easily tai- 

lored to a wide variety of equipment, 

and is basically just what you want for 
editing program source code. It’s not a word proces- 
sor, but there is the very popular WordStar (also 
from MicroPro) for that job. 

WordStar is so popular, in fact, that it seems 
everyone is familiar with the keystrokes it uses for 
moving the cursor around and for basic editing tasks. 
These keystrokes quickly become second nature, and 
are done without thinking, just as operating the 
clutch and brake in driving a car. 

But after a few hours of working with WordStar 
on a document, these second-nature habitual key- 
strokes get you in trouble when you go back to Word- 
Master to do some source code editing. Why not just 
stay with WordStar in the nondocument mode for 
programming? Several reasons: 


1. It is bigger, and takes longer to load into 
memory. 

. It takes up a lot more disk space that I 
always seem to need for programs. 

. It doesn’t normally come up in nondocument 
mode, so it takes much longer to get a file 
opened and get to work. 

. It has to drag in an overlay file for such 
things as delete to end of line, and this 
takes extra time. 


For documents, I like WordStar very much, but for 
programming, I’ll take WordMaster, thank you. 

Release 1.06 and earlier of WordMaster used the 
ADM-3A default keys of control H, J, K, and L to 
move the cursor around, while WordStar uses control 
S, E, D, and X because the diamond shape they de- 
scribe supposedly makes it easier to remember which 
does what. I disagree with this idea, but never mind, 
the deed is done, and the whole world uses S E D X 
now. 

Release 1.07 of WordMaster “fixed” part of the 
problem by making control S E D X the cursor keys, 
but didn’t go quite far enough in the right direction. 
Many of the other basic editing functions that could 
have been made the same as WordStar’s were not. A 
particularly hazardous conflict is the use in Word- 
Star of Control K for a variety of functions such as 
closing a file, while in WordMaster 1.07 it means 
DELETE TO END OF LINE. So without thinking, 
you do a control K, and oops!—there went most of a 
line of complex code into the bit bucket. 

After two years of frustration from the inability of 
my fingers to remember which editor they were driv- 
ing, I spent a little time to see if I could find a way to 


Jim Gilbreath, 7266 Courtney Drive, San Diego, CA 
92111 
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patch WordMaster 1.07 to make it a lot more like 
WordStar. Specific goals were: 


. Control K, L, and O “disconnected,” so hitting 
them would not do any damage. 

. Make Control V toggle the insert mode, as in 
WordStar. 

. Make Control QS and Control QD position the 
cursor to left and right ends of the line, as in 
WordStar. 

. Make Control QE and Control QX position the 
cursor to top and bottom of the screen, as in 
WordStar. 

. Make Control QY delete to end of line, as in 
WordStar. 

. Disconnect Control B, since there is no line jus- 
tification in Word Master. 

. Make Control QI move cursor to next tab 
stop. 

. Make Control U “interrupt” to Command 
Mode (very useful when you've done 
*<Nsearchword$V and want to get out of it 
before hitting the end of file). 


Several hours of poking around with the debugger 
and experimenting led to the successful development 
of a patch program (Listing 1), which, when loaded 
on top of WordMaster with DDT, will provide all the 
above features. And the frustration is gone! I can now 
switch back and forth between WordMaster and 
WordStar and find that all the commands are the 
same or harmless. 


Date and time 

An important feature not found in the CP/M-80 file 
system is the ability to keep track of when a program 
was last changed, and therefore which version is the 
latest and greatest. Based on some earlier work by 
Dick Mason and Mike Lehman, another Word Mas- 
ter patch was developed that allows you to keep the 
date and time as a comment on the first line of a file. 
It’s a simple kludge, consisting of four “anything” 
characters on the first line followed by the date and 
time, as in “DATE O6sep82 1735”. 

The “anything” characters depend on the lan- 
guage’s requirements for a comment line: for exam- 
ple, REM in Basic, /* in C, ; in Assembly, C in For- 
tran, (* in Pascal, etc.). 

The mechanism is activated the first time you en- 
ter Command Mode, if the fifth through eighth char- 
acters of the file are DATE. If you have a clock/ 
calendar provision in your computer, you can modify 
the patch code to automatically update the date line. 
Otherwise, the patch will print the current DATE 
line at the bottom of the screen and encourage you to 
update it manually. If you don’t want to bother with 
it at the moment and respond with only a carriage 
return, the time field will be incremented by one. (It 
doesn’t know about seconds and minutes, so 1459 will 
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LISTING 1. 
DATE 20nov82 2324 


Patch for WORDMASTER 1.07 to provide WORDSTAR keystroke 

compatibility and dating of file changes. 

Beginning of files must be like the beginning of this one 
(four anything characters, followed by DATE ddmmmyy tttt) 


1M SI Weis 


Y- 


XdH° HOLWdWMI- 


History 


os 
0000 9dWVZ 


1980 dick mason customized terminal mods 

mar 81 mike lehman added VERSION numbers 

mar 81 jim gilbreath adapted to 1.07 

jan 82 jim gilbreath changed VERSION to DATE and added time 
aug 82 jim gilbreath for wordstar compatibilitv 


o[dwiexg ‘syo[q 


Tp AAVS Pur ‘d-[os}U0D ed “y1 Jo do} uo ay KAH’ 


. 


Od JLXdN 
Od WLXdN 
@°? SYdA Lad 


OOTO 0892 
WOO*UYLSWM LAd<v 


jsoinjeaj Mou dq} JNoGe 
YIN} 94} 19} HW oyu Or TH YALSVWAGUYOM 


SuljIpo Aq [00} mou sno Bulsn soNovId MON 


bdos 5 


youed oy} Buyjje}ysu] 


7 These version sensitive equates. They MUST all be correct. 


bufptr 1lb7h yadr of patch area 

probe 04e0h zadr to place jump to patch 

retl 04e3h 7Place to return if no action 

ret2 04deh splace to go if we did anything 

patarea 29b8h zlocation of patch area (old text buffer) 
chout 24fch yroutine called where probe was placed 
chinp 23b4h 7get a character from keyboard 


WOO*QUMHN @P FYAVS<V 


pritbl 10d6h ylocation of key priority table 
keyvec licSh location of key dispatch table 
ctlvpat 2346h zlocation of control v vatch 


‘(019 ‘OOST 01 66PI ‘O9PI 0} poueuresoUr oq 


DUMMY 1345h 
CURLTWD 126Dh 
EOLTOGL 1289h 
WINDOWN 142Ch 
CURRT 1216h 
CURUP 1303h 
CURRTWD 123Fh 
GOBBLE 14ECh 
CURLT 122Ah 
TAB 153Ah 
HELP 1954h 
CARRET 15ABh 
INSLF 1594h 
CTLCHR 151Ah 
CURTAB 12B6h 
WINDUP 1414h 
DELWD 1476h 
INSTOGL 150Bh 
WINDUP1 1409h 
CURDN 12C1h ace 
LINEDEL 14CEh defb 
WINDN1 137Ch defb 
ESC 1205h 


defb 
DELWDLT 1460h defb 
UPDOWN 1346h defb 


GOTOP 134ch defb 
GOBOTM 1362h defb 
GOLTEND 128fh defb 
GORTEND 1l2ach defb 
DELEOL 14ddh defb 
LEFTDEL 1448h defb 
ERMSG 0534h defb 
EPAT 053eh defb 
CMDMODE 04b9h defb 
; defb 
bufptr address of vointer to text buffer defb 

next ;change start of edit buffer 
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or 
pritbl g 


;KEY JUMP VECTOR, BEGINNING WITH “@ 


defw DUMMY 7; “@ do next kev 4 times 
defw CURLTWD ; “A 


WordMaster Patches continued 
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ae" $295 limited time only 


“MAGIC/L 


The Simple Software Solution 
For Difficult Hardware Development 


MAGIC/L, the interac- 
tive programming language 
that brings whole systems 
to your fingertips, is now 
available for $950. 

MAGIC/L directly 


@ Invoke all RSX executive 
directives 


© Access the I/O page 
¢ Write assembly code 
¢ Write programs in simple 


accesses all RSX system MAGIC/L syntax 
resources and offers a sin- Optimize your productiv- 
gle consistent environment ity with MAGIC/L's blend 


that lets you: 
e Run tasks and MCR commands 
¢ Edit your previous command line 
¢ Ideal basis for customized user 
environments 


of Pascal-like syntax and 
Forth-like extensibility. It is available for 
RT-11 as well as Data General and 
68000-based systems. 

Meet MAGIC/L now! 


LOKI ENGINEERING, INC. 
55 Wheeler St., Cambridge, MA 02138 (617) 576-0666 


RSX-11 and RT-11 are pees of Digital Equipment Corporation 
© Loki Engineering, Inc. 1982 


WORD PROCESSOR. & CALC 
& EDITOR & MAIL MERGE 
& REPORT GENERATOR 

eAll in one 34K program 
eFor 8 and 16 bit micros 
eEasily customized 
Manual & 25 Practice Jobs 


WES 


HAS THE FEATURES 
YOU WANT. DOES MANY 
JOBS. IS EASY TO 


LEARN. WORKS FAST 
(SUPER FOR MULTI-USERS) 


REG $495 SPECIAL $295 
VISUAL EDITORS 


eComplete Macro Language 
eCustomizable eFast 
eExtensible eCompact 
Chip Reg Special 
80 $175 $145 
86 $225 $195 
68K $225 $195 


VOLLEY 
137 Main Street 
US Westerly, | 


Systems CALL [401 596-1811 


Name 
MATE 
PMATE 


CIRCLE 61 ON READER SERVICE CARD 


CIRCLE 59 ON READER SERVICE CARD 
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DUMMY 
WINDOWN 
CURRT 
CURUP 
CURRTWN 
GOBBLE 
CURLT 
TAB 
HELP 
DUMMY 
DUMMY 
CARRET 
INSLF 
QUMMY 
CTLCHR 
apatch 
WINDUP 
CURLT 
DELWD 
NTRUPT 
INSTOGL 
WINDUP1 
CURDN 
LINENEL 
WINDNL 
ESC 
DELWDLT 
CTLCHR 
UPDOWN 
LEFTDEL 


formerly end of line togale 
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dn jas Aseq 


>> 


formerly delete to end line 
formerly cursor right 
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etlvvat 
ectlvpat By jumo around test for vio control 


epat 
emdmode 


probe ;Datch iump location (VERSION sensitive) 
danatch sOverlays call to print char routine 


vatarea ;Dlace to put our code 
?got a control q multicode 


chino 7aet next char from keyboard 
O1fFh :strio off to bare control code bits 
04h scontro! a 

z,GORTEND 790 to end of line 

05h scontrol e 

z,GOTOP 740 to tov of screen 

09h scontrol i 

z,CURTAB ;Ccursor tab 

13h scontrol s 

z,GOLTEND :go to left end of line 

18h scontrol x 
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z,GOBOTM 790 to bottom of screen 
19h ;contro) y 

z,DELEOL ;delete to end of line 
DUMMY 7none of the above 


swayshs W/d> 40} wos6oig asog 010g v 


NTRUPT: ERMSG ;return to command mode 
“COMMAND MODE “,0 


dapatch: 


GuVD SDIAYSS Y30V3Y NO ZS ATOUID 


chout ;type * (VERSION dependent 

af 7save char 

a, (bhb) ;first time through? 

a ;set flag 

z,initit iyes 

af 7no, continue 

retl 3p back where left off (VERSION sensitive) 
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ld hl,num+digits-l ;point to last digit 

1d b,digits 

call bmpasc zincrement ascii number 
ret 


msgin: defs sactually needs only 12 


datmsg: defb 

curdat: defs 7gets stored into by whats in file now 
defb 

crit: defb 


Bulpiaoid 
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compar compares string vointed by hl to that nointed 
by de for chars in b. returns with zero set 
if a match. 


Jd a, (de) 

cp 

ret yreturn if mismatch 

dec 

ret 7z is set iff match to end 
inc 

inc 

jp compar skeep checking 
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bmpasc increments ascii number whose last digit is 
pointed by hl. b has number of diqits. 


ADV YALNdINOO 


youresey je}/61g jo ysxewepes} pesejsiBei & SI Widd. 


inc (h1) sincrement ascii digit 
1d a, (hl) 

cp “9°+1 roverflow? 

ret nz 7n- were done 

1d (Lig 0 7y- reset to 9 and do 
dec hl 7 next digit 

dec b zlast digit? 

jp nz,bmpasc 7n- do next 

ret 7y- done 
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bhb: defb 0 zbeen here before flag 


next equ $ ;start of edit buffer 

vertxt equ next+1+4 74 don’t cares, then date 

dateloc equ vertxt + vmlen ;where lljan82 or equiv goes 

num equ vertxt+13 ;Sstart of ascii number 

digits equ 4 ;number of digits in time no 
end 


LISTING 2. HEX File 
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:1C2A98003A20240D0A241ABECO005C8 1323C39E2A347EFE3ACO 36 302B05C2A8 2A6F 
:022AB400C90057 
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ES 
OFTWARE PRICES 


Y WW 


ANY 


0 NY A, A W wr 
reby certify that your purchase 


WW 


from Discount Software 


re 


WH 


resent. 


the lowest price sold anywhere. If you find a lower price on what you purchased 
within 30 days, send the ad and we'll refund the difference. 


Discount Price 


ARTIFICIAL INTELLIGENCE 
Medical (PAS-3) $849 
Dental (PAS-3) 

ASHTON-TATE 


$42? dBASE II... 


= call for price 


dBASE User's Guide 
FIG AYN osc. :c cscuatesay ecm sen acs $26! 


DIGITAL RESEARCH 
CP/M 2.2 
Intel MDS 


and 


ORS or QRS or RTL 
MDBS PKG 
MICROPRO 


$979 WordStar 
$ 1 79 Mail Merge 


WordStar/Mailmerge .... 
WS/MM/SpellStar 


$4 99 SpellStar 


DataStar 
InfoStar ... 
ReportStar. . 
Wordmaster 
Supersort I 
Calc Star 
MICROSOFT 


$949 as ; 
$329 Basic Compiler 
$349 Fortran-80 
$549 Cobol-80 


MuSimp/MuMath 
MuLisp-80 
ORGANIC SOFTWARE 
Textwriter III 
Datebook I! 
Milestone 
OSBORNE (McGraw/Hill) 
G/L, or AR & AP, or PAY... 
All3 
All 3 + CBASIC-2 
Enhanced Osborne 
PEACHTREE 
G/1,A/R,A/PPAY,INV(each)$399 
P8 Version 
Peachcalc 
Peachpak 

(G/L, A/R, A/P) 
STAR COMPUTER SYSTEMS 
G/L,A/R,A/P, Pay(each). . $349 
All 4 
Legal or Property Mgt... . $849 
STRUCTURED SYSTEMS 
Business Packages (call) 


SORCIM 


$4 79 SuperCalc | 


SuperCalc II 
Act 
SUPERSOFT 
Ada 
Diagnostic |I 

Disk Doctor 

Forth (8080 or z80) 


C Compiler 

Scratch Pad 

StatsGraph 

Analiza Il 

Disk Edit 

Term Il 

Utilities | or II 

SOFTWARE DIMENSIONS/ 
ACCOUNTING PLUS 


Mince or Scribble (each). $149 
Both $249 
The Final Word 
WHITESMITHS 

“C" Compiler 

Pascal (incl '“C”) 

“PASCAL” 


“WORD PROCESSING” 
Perfect Writer 
WordSearch ... 
SpellGuard 

Peachtext 

Spell Binder 


$4 45 The Word Plus 


Palantier-1 (WP) 
“COMMUNICATIONS” 


$4 39 Crosstalk 


$ 89 Move-it 


“OTHER GOODIES" 
Micro Plan......... 22 $4 


Target PlannerCalc $79 
Target Financial Modeling. $299 
Target Task $299 
MicroStat 

Vedit 

MiniModel 


String/80 (source) 
ISIS CP/M Utility 


Zz 
ATI Power (tutorial) 
Mathe Magic 

CIS Cobol 


ASHTON-TATE 

(See CP/M Ashton-Tate) 
BRODERBUND 

G/L (with A/P) 


EasyWriter (Prof) 
EasyMailer (Prof) 


OSOFT 
Softcard (Z-80 CP/M)... . $249 
$ 


Premium Package 
RAM Card 
MICROPRO 

(See CP/M Micropro) 
Z-80 Card 

VISICORP 

Visicalc 3.3 
Desktop/Plan II 
Visiterm 


FREE WITH PURCHASE: 


Buyer’s Guide 
($5.00 value) 
Filled with facts and 
usable advice about 
scores and scores of 
1 \ software p! 


utilities. 


\ from 
' accounting and business 


Exclusive 
“Hotline” 


Our reputation for cour- 
teous and knowledgeable 
service has resulted in calls 
from people who never 
purchased our products. 
Now a separate “hotline” is 
systems to word processing available to customers only. 


Confidential 


Software 


Parcel Pt 


Outside Continental U.S.—add $10 
ost. Add $3.50 


PEACHTREE 
G/L, A/R, A/P, PAY, (each). $224 
$349 


ACCOUNTING PLUS 

G/L, AR, AP, INV, (each). . $385 
“OTHER GOODIES” 

Dow Jones 

Incredible Jack 

Super-Text I! 

Data Factory 

Mini Factory 

DB Master 

Versaform VS1 


IBM PC, 16 


“WORD PROCESSING” 
Wordstar $289 
Spelistar 

Mailmerge 

Easywriter 

Easyspeller 

Select/Superspell 

Write On 

Speliguard 

Spellbinder 

Final Word 


Pascal MT+ /86, SPP.... 
CBasic 86 

Act 86... 

Trans 86 . 

XLT 86 

MBasic (MSDOS) $329 
MBasic Compiler (MSDOS). $329 
Cobol (MSDOS) 

Pascal (MSDOS) 

Fortran (MSDOS) 

“C" (MSDOS) 

“OTHER GOODIES” 
SuperCalc II 
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Regular notices of insider’s 
bargains not available to 
the general public. 


DISCOUNT SOFTWARE 


BargainGrams 


lus Air 


e and handli 


per each item. California residents add 6 


sales tax. Allow 2 weeks on checks. C.0.D. $3.00 
extra. Prices subject to change without notice. 
All items subject to availability. ®Mfr. trade- 
mark. Blue Label $3.00 additional per item. 
CP/M is a registered trademark of DIGITAL 
RESEARCH, INC. 


1 800 421-4003 
or 1 213-837-5141 


Calif: 1 800 252-4092 
6520 Selma Avenue, Los Angeles, CA 90028 


s| ORDER TOLL-FREE 
VIA VISA OR 
MASTERCARD: 


| 
| SS 


The most widely sold DBMS for micros, dBASE II 
defines the state of the art. An inexperienced user 
can create a dBASE file, begin data entry, and print 
out a report in minutes; the experienced program- 
mer can create complex program systems using 
dBASE’s unique programming language. Both can 
use automatic program generators and other pro- 
gramming tools to create applications quickly and 
easily. 


MULTIPLAN /$189 


The world’s hottest-selling spreadsheet, Multi- 
plan™ is now setting the standatd for ease of use 
and quality of documentation. Each of the Multi- 
plan™ series comes complete with sophisticated 
training programs. 


Multi-Tool Budget ‘expert system’: used with Multiplan™, enables new 
users to get budgets outin minutes ............. cc cee eee eee eee eee 


Multi-Tool Financial Statement: Expert help in getting out financials. 


EDIX & WORDIX/$279 


dBASEII'/$398 


QUICKCODE: Automatically creates menus 
screens which check input for correctness. 
programming time! aM. ............ 


dUTIL: Formats 


EDIXis a full-screen editor specifically designed to 
take advantage of the advanced features of the 
IBM PC; WORDIX is the best text formatter on the 
market. Together, they are an unbeatable combi- 
nation, the finest word processor available on a 


Te a ee eT ee ee ee ee $149 
So a | fe eee ee ee ene mae Fe $149 


micro—at an unbeatable price! 


These Hayes Stack Modems link your computer's 
RS232 serial port directly to a modular phone jack. 
They will dial the phone for you, and answer it as 
well. The Smartmodem 300 runs at 0-300 baud; 
for those needing higher speed, the Smartmodem 
1200 can run at 1200 baud. 


Orders must be PAID by AUGUST 31to qualify check/MO/bank transfer. Allow time for company or personal checks to clear. 


for these special prices 


SMARTMODEM...$209 
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1200 p9O9 
NEW! NEW! NEW! 


Smartmodem 1200B: for the IBMPC only .........02..00eeeeeeees $469 


TERMS: All prices subject to change without notice and availability. Cashier's 


Prices reflect cash prepaid discount. VISA/MASTERCARD/COD/PO's + 3%. 
CA residents add sales tax. All sales final for games & special orders. 
SHIPPING: $3 per item for UPS surface ($6 for Blue Label) within Continental 
USA, except where shipping cost is specified in square brackets. UPS does 
not go to Canada, Alaska, APO's, FPO's; call for ship charge or add 15%—we 
will refund/credit difference. 

RETURNS: Must have authorization number, obtained at 415-324-0305. Unau- 
thorized returns will be refused; damaged goods will be refused. All returns 
subject to 15% restocking fee. No return after 30 days. 


(800)222-8811 


Inside California: 


(415)324-3730 


Your CP/M & HARDWARE Source 


CP/M-80 


8" standard SSSD and Apple 514”. 
Please call to confirm price & 
availability for other formats, available 
as speciai orders. 
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Anderson-Bell 
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Artificial Intelligence 312 
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Ashton-Tate Citation ............. 250 169 
Bottom Line Ecosoft 
Strategist ........... 400 279 Microstat ayeerestest 295 248 
GBASEII ........ {5] 700 398 Microstat3.0....... 395 320 
GBASE |! w/User’s Epic 
Glide ..sczczexe (5) 729 419 Supervyz ........... 150 94 

Aspen Software Faircom 
Grammatik ......... 75 56 MicroB+ (CBasic) 260 211 
Proofreader ........ 50 38 _ MicroB+ (Other). 260 211 
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BOSS Fin. Acctg GRAPH oo csaxsccnas 295 195 
System .........000+ 2495 1496 © dUTIL . 59 
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Computer Control “a Quickscreen/ } 
FABS-BTree File MBasiC..........20.-5 149 125 
Access .... Alm yrg9s 146 FYI Inc. —_ 
Ultrasort I 49 6=—« SUREnIeeee... 195 129 

Computer development * Human Soft: 

Image wesescterceter: os 6356 «2 dBPlus.............. 125 95 

Comshare Infocom 
Planner Calc ...... .<ifilao TAs Deadline ............ 60 43. 
Target Applicationé y Starcross .... . 50 ae 
Guide ......... 4am 50) a8 / Suspended@@s22 50 4.38 
Combo Pak ... (iim 7 Ze 50/ 38 

Condor ~ Zorkll.... 750 88 
Condor1... Tage, COMI eer .... Saeed Geeco 
Condor 3 . 398 y A 

Designer Softwarg! = \Mathemagion:...... 100 “ae 
Palantir ......, 4... 42560 319 ‘Whacalntersystems 7 =e 

Dictronics é y Pascal BZ we 45 375 
Random Houses  ascaz fy 375 
Thesaurus ........ ee 113 Pascaliae BZ 542 

Digital Research Lexisoft) | 
Access Manager... 300 225 Spelbinder ......... 495 281 
CB80 .... me 395 Metasoft 
CBasic . 94 Benchmark Mail 
CIS Cobol .. Bon Listvssessaxeevercocss 250 184 


Despool 38 Benchmark 
DisplayManager... 400 295 Wordprocessor .... 500 367 


TERMS: All prices subject to change without notice and availability. Cashiers 
check/MO/bank transfer. Allow time for company or personal checks toclear. 
Prices reflect cash prepaid discount. VISA/MASTERCARD/COD/PO's + 3%. 
CAresidents add sales tax. All sales final for games & special orders. 
SHIPPING: $3 per item for UPS surface ($6 for Blue Label) within Continental 
USA, except where shipping cost Is specified in square brackets. UPS does 
not go to Canada, Alaska, APO's, FPO’s; call for ship charge or add 15%—we 
will refund/credit difference. 

RETURNS: Must have authorizationnumber, obtained at 415-324-0305. Unau- 
thorized returns will be refused; damaged goods will be refused. All returns 
subject to 15% restocking fee. No return atter 30 days, 
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Finding the Location of a Variable 


in North Star Basic 


by Doug J. Anderson and John C. Nash 


rograms in Basic may call machine lan- 
guage subroutines to perform special oper- 
ations not normally provided by the lan- 
guage itself or performed only inefficient- 
ly. North Star Basic, which will be consid- 
ered here, uses the following syntax: 


line number LET variable = CALL Caddressynumber) 


@ode 100 LET TS=CALL (10740y 4096) 


which puts the (decimal) value 4096 in the 8080/ 
Z80 DE register pair and executes a call to the (de- 
cimal) address 10748. The value of the HL register 
pair at the end of the routine is returned in the vari- 
able TS. 

For many applications, however, we would like to 
pass the location or address of a particular variable, 
array or string so that this data could be processed by 
a machine language subroutine. In our own case, the 
requirement was for a rapid sort of an integer array. 
Before the sort could be called, we needed the loca- 
tion of this array in memory. This can only be found 
if the storage mechanism for data is understood. 
(This task is accomplished in Microsoft Basic 80 by 
the VARPTR function, which North Star Basic does 
not provide to date.) 

North Star Basic (version 4.1 of N* DOS, Basic, 
and FPBasic are considered here) uses memory as 
outlined in Diagram 1. Some key addresses are: 


SBAS—start of BASIC = 02A00H. 
ENDBAS—end of BASIC; the pointer EBASP 
at O2A06H gives this. 

ENDRAM—\the last memory location in 
contiguous RAM that Basic may use; 

the pointer EMEMP at 02A09H gives this. 
ENDPROG—the last byte of the program, 
which is always 01H to conform to N* program 
storage conventions; the pointer EPRGP 
contains this address. 


Of the above, only EPRGP is awkward to find, since 
North Star does not list it in their description of Basic 
or FPBasic. However, it can be found by means of the 
simple program given in Listing 1. This uses the 
mechanism by which a program is stored in memory, 
which is to precede each program statement by its 
length in bytes. The count includes the length byte, so 
the last “statement” has just one byte—the length 
byte—-so is stored as 01H. The program in Listing 1 
finds the length of the first statement in the program 
itself in the byte at ENDBAS+1. This length is 
added to that location to get the start of the next line, 
and so on until 01H is encountered. The program 
then searches Basic until this address is encountered. 


Doug J. Anderson and John C. Nash, University of 
Ottawa, Ottawa, Ontario, Canada 
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Note that different precisions of Basic or the use of 
FPBasic will change the location of EPRGP. 

In North Star Basic, the symbol table follows the 
program. Data is identified by a letter (upper case) 
followed, optionally, by a digit (0-9). Arrays are dis- 
tinguished by the opening parenthesis “(”, while 
strings are explicitly denoted by the $ symbol. The 
following examples are presented to clarify this: 


Simple varianle fiy Ty 299 SO (S-zero) 
Array Tee Ve6 
Strings Rey, Qis 


Simple variables require space to store just one 
number. In N-digit precision (N is always even in 
North Star systems), binary-coded decimal storage is 
used to pack the mantissa in N/2 bytes, with the sign 
and exponent being placed together in a further byte. 
The total is thus (N/2)+1 bytes for each number 
stored, exclusive of any overhead for identification 
(see below). The exponent is stored in excess 40H 
notation, i.e., 40H is added to the true exponent, with 
the (implicit) decimal point preceding the first signif- 
icant digit of the mantissa. 

An array dimensioned by the statement DIM 
B(3,4,5) requires space for 4*5*6 = 120 such num- 
bers, in addition to administrative overheads. The di- 
mensions must be incremented by one in this calcula- 
tion because North Star Basic allows a zero index for 
array elements, i.e., the element B(0,0,0) is permit- 
ted, as are B(0,1,1), B(2,0,2), and B(3,3,0). 

Strings require one byte to store each character 
space reserved by the appropriate DIM statement. 
Thus DIM T$(22) reserves 22 bytes in addition to 
overhead. 

Internally, the mechanism used to access data is 
the linked list. Each identifier must begin with a let- 
ter of the alphabet, and North Star Basic has a table 
of 26 addresses (pointers) immediately following the 
program terminator 01H. The first of these pointers 
gives the location of the first member of the A list, 
the second pointer that of the first member of the B 
list, etc. If there are no variables, arrays, or strings 
beginning with the corresponding letter, the pointer 
is set to OOOOH. Addresses, including these pointers, 
are stored in the usual 8080/Z80 reverse fashion, i.e., 
low-order byte, high-order byte. 

Suppose the A pointer is non-zero. At the desig- 
nated address, North Star Basic stores a one-byte 
code identifying the type of data that follows. This 
code is split into two hexadecimal digits. The first 
specifies the type of label: it has value 0 for a simple 
variable, 2 for an array and 8 for a string. The second 
hexadecimal digit has value 0-9 for numbered iden- 
tifiers and value OFH for un-numbered ones, e.g., Z, 
A$. 


The one-byte code is followed by another two-byte 
pointer to the next member of the sequence belonging 
to a given letter of the alphabet. Once again, the ad- 
dress is in 8080 reverse order, and a zero value indi- 
cates the end of the linked list. 

Following the pointer in the case of a simple vari- 
able will be the numerical value itself occupying (N/ 
2)+1 bytes. 

In the case of an array, the pointer is followed by a 
two-byte count, low-order byte first, of the number of 
bytes of storage for the actual data elements. Call 
this value C. 

After this count a set of two-byte values are stored, 
which have the dimensions of the array plus one. The 
extra one is to allow for the possibility of zero indices 
of the array subscripts. There are (p+ 1) of these 
two-byte counts for a p-dimensional array, with the 
last value being zero (i.e., 00 OOH). This allows the 
interpreter to know how many subscripts are permit- 
ted for a given array. The data elements then follow 
in the order where the last index varies most rapidly. 
Thus, for a two-dimensional array dimensioned 2 by 
3, the elements are stored in the order 


070 , , rO 1y1 12 153 270 21 202 203 


For a string, the pointer to the next member of 
a letter sequence is followed by two counts of two 
bytes each (low-order byte first as usual) giving the 
maximum (or dimensioned) number of characters 
and the actual number of characters currently stored 
in the string. The string data follows these counts in 
ASCII. 

In diagram form we have the following byte 
maps: 

—simple variable (total of N/2 + 4 bytes): 


code prointerLO rointerHI (N/? betes mantissa) ¢<1dn/exeonent) 


—p=dimensional array (total of C + 2*(p+3) + 
1 bytes to store array and overhead information, 
where 


Cc (N/?+1) * DIML ¥ DIM? © oo. ® DEM 


is the space for the data itself). Note that here DIMx 
is the declared x dimension plus one for the zero in- 
dex: 


code pointerLO PointerHI bytecountLO bytecountH? OTM1LO DIMIHT 


DIM2LO DIM2HI ... DIMPLO DIMPHI 00 00 (element 070...%0 etc. for a total 


of C butes) 


—q-character string (DIMensioned for q charac- 
ters, default is 10 characters if no explicit dimension 
is given). A total of q+7 bytes are used. 


code rointerLO rpointerHI TIMLO DIMHY lenstthlO TenetthHl (a character 


sraces) 


To see how this appears in memory, one can load 
and run the program given in listing 2. Note that the 


Memory address (hex) 


1200H: assembled 
symbol finder 


2A00H : BASIC 


ENDBAS 
program code 
ENDPROG 


stacks 
on-P-- ENDRAM : physical end 
of memory 


PROM : E800H North Star 
Disk controller 


DIAGRAM I 
NORTH STAR MEMORY ALLOCATION 


symbol table and data are created as the program 
runs. Remember that the assembled symbol finding 
subroutine must already be in memory before the 
STORTEST program is RUN, or unpredictable and 
probably disastrous results are likely to ensue. The 
program shows how data corresponding to each vari- 
able name is stored in memory. A sample output is 
given in Listing 4. 

Listing 3 gives an 8080 Assembler subroutine 

which, given the name of a variable, array or string, 
returns the address of the code byte which begins the 
storage area for that label. This routine is provided 
with the name by FILLing (poking) three bytes of 
information into bytes 4, 5, and 6 of the assembly 
routine memory area. If the address of the start of the 
assembly routine is called ALOAD, these bytes and 
their functions are: 
ALOAD+3 $ letter of alrhahet of mame (A ~- Z) 
ALOAL+$ ¢ blank or 0-9 (secondary rart of mame) 
ALOAD+Z ¢$ blank for simrle variable 

( for array 


$ for string 


For the most effective use of calls to machine 
language subroutines, we need to pass not 
just the value processed by the CALL function, 
but rather the address of the data string 
or array processed by the subroutine. 


iables continued 


North Star Va 


the case of an array. 
2 in lines numbered 500 
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Shell-Metzner 
(Assembler) 


£01 T= 40d OZT 
I=(1)0 O9T 

€ OL O=f 4O4 OST 
aSZU.G2Y OFT 


LS3L 404 JOVYOLS NI ¥ivid SWOS 13S MON W344 
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Suv $X NY $S AING WM 
(9EI$S4CB 8X4 CZ) aH 4 (6)$H4(847)624(E)O WIT 
»CB6T HOMYW LSSLNOLS. LNIYd 
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600 
610 
620 
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640 
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1070 
1080 
Lovo 
1100 
1110 
1120 
1140 
11406 
1150 
11460 
41170 
1180 
1190 
1200 
y210 
1220 
1230 
4240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 


PRINT “ERROR ~ CODE RYTE HAS INVALID CODE!H!1* 
STOP 
PRINT "SIMPLE VARIABLE ~~-~* 
GOSUB 14460 
LET Yi=Yl+2 \ REM POINTER TO DATA 
PRINT “DATA AT CODE BYTE ADDK + 2° 
GOSUB 670 \ GOTO 280 
*MANTISSA 3 "> 


t TO N/2 
XAMCY1+Y4) \ GOSUB 1410 
YS=VSKLOFINT(Y/16) \ REM FIRST DIGIT 
Y3"YSKLOFY"1GKINTCY/16) \ REM SECOND DIGIT 
NEXT Y4 
PRINT * SIGN/EXPONENT $*%9\ LET Y=EXAMCYLEN/ 2419 
-128 THEN 780 \ REM POSITIVE? 
Y¥3 \ REM MAKE VALUE NEGATIVE 
~128 \ REM AND ADJUST EXPONENT/SIGN TO LEAVE EXPONENT 
~N-64 \ REM EXPONENT ITSELF ADJUSTED FOR 10°N 
<O THEN 850 
YS=0 THEN 880 
FOR Yé6=1 TO YS 
3e10 
NEXT Y6 
GOTO 88o 
FOR Yé=1 TO -YS 
LET Y3=Y340,1 
NEXT YS 
GOSUR L410 \ PRINT * 
RETURN 
REM ARRAY 
UR 1460 \ REM LOOK AT YOINTER 
YI#Y142 \ REM BYTECOUNT START 
VT YO@EXAMCY 141 +25 6%E YAM LYLE) 
PRINT “BYTE COUNT IN ARRAY="97Or® 
GOSUB 1480 
LET Y9eO \ REM DIMENSION COUNT 
LET’ YieY1+2 \ REM GET NEXT START FOR DIMENSIONS 
LET Y9=Y9+1 \ REM ONE MORE DIMENSTON 
LET Y2=EXAMCY1L+1)+4+256"EXAMCY142) 
PRINT “OXTMENSIONC’ yYOr")44 = "2 70y" My 
GOSUB 1480 
IF ¥2>0 THEN 970 
PRINT Y9~‘r* DIMENSTONAL ARRAY* 
PRINT "DATA ELEMENTS = LAST DIMENSION VARIES MOST RAPIDLY" 
LET Y1l"¥1+2 \ REM INITIAL omTA POSN 
LET YO=YO/(N/2+1) \ REM NUMBER OF ARRAY ELEMENTS 
FOR ¥9=1 TO YO 
GOSUB 4706 
LET Y1=¥1t(N/241) 
NEXT 
Goro 
REM STRING 
GOSUF 1460 \ REM POINTER 
LET Yl=¥142 
LET YOPEXAMCY 141 425 5KEXOM CY 142) 
PRINT “STRING DLMENSTON="2YOQs"» HEX? * + 
GOSUER 1480 
LET Yi=¥1t2 \ REM LENGTH STAFT 1 
LET YSRRXAMCY141) F256HEXAMCY1E2: 
PRINT “LENGTH="sV39"%) HEX? "»s 
GOSUB 1480 
PRINT "STRING CONTENTS # ‘7’ MARKS END OF ACTUAL LENGTH" 
PRINT "IN ASCII — ONE SPACE BEFURE Ano ob TEI? HAUH UHARAUTER® 
LET Y1=Y1+2 \ REM FIRST CHARACTER ADDKESS MINUS 1 
FOR Y9=1 TO YO 
LET Y=EXAMCY14+Y9) 
PRINT * “sCHRE(Y)e* Sy 
IF Y9=Y3 THEN PRINT */",y 
IF 25KINTCY9/25)=Y9 THEN PRINT 
NEXT Y? 
PRINT 
PRINT ‘Jit HEX* 
FOR Y?=1 TO YO 
LET YsEXAMCTOFYL) 
GOSUB 1410 
IF Y9=Y3 THEN PRINT “/'"y 
IF 25KINT(Y9/25)=79 THEN PRINT 
NEXT Y9 
PRINT 
GOTO 280 
REM PRINT BYTE IN HEX 
LET Y7=INT(Y/16) 
LET Y8=Y-16*Y7 


VALUE=" 7 ¥3 


1440 PRINT * * S&C Y7+L9Y741) vS$(YBt1L 2 YOH1) » 
1450 RETURN : 


REM POINTER TO NEXT SYMBUL TABLE ENTRY 


PRI 


NT "POINTER TO NEXT ENTRY 


LET Y=EXAMCY1+1) 


PRI 
LET 
PRI 


NT "LO BYTE 


Y=EXAM(Y1+2) 


Nai 


RETURN 


ASSM 1200 


1200 
1260 
1200 
1200 
1203 
1206 
1206 
1206 
1206 
1206 
1206 


cs 


98 12 


HI BYTE 


=*,y\GOSUB 1410 


TN TABLE 


=",\GOSUB 1410 \ PRINT 


1000 
1010 
1020 
1030 
1040 
1050 
10460 
LO70 
1080 
1090 
1100 
1110 
1120 
1130 
1140 
1150 
1160 
1170 
1180 
1199 
1200 
1210 
1220 
1230 
1240 
12506 
1260 
1270 
4280 
1290 
1300 
1310 
1320 
1330 
1340 
1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 


1440 * Hel POINTS TO FIRST TABLE ENTRY 
1450 * NOW GET CODE FOR MATCHING 


1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1430 
14640 
1650 
16690 
1670 
14690 
1690 
1700 
1710 


Listing 3 


* FIND SYMBOL IN BASIC SYMBOL TABLE 


* FSYM MAR 


4 82 


* FOR USE BY BASIC ‘CALL’ 


FSYM JMP 
STORE ASC 


* STORE HAS 


%* STORE 


SEAS EQU 
ERASP EQU 
EMEMP EQU 
EPRGP EQU 


* ALL THE ABOVE FOR NOS 4.1 ORIGIN 2000H 
* CHANGE FOR OTHER DOS VERSIONS 


* CONTENTS 
DOSST EQU 
bos EQU 
BL.NK EQU 
LSTK nS 
: LXxt 
DAL 


SHLD 


START 


NEXTO 


STRNG 
ARRAY 


CODER 
CONTL 


CONT2 
CONTS 


* NOW 


GOPT JUMP OVER STORAGE AREA 
ASS’ 

A-Z CHARACTER 

IS BLANK OR HAS DNTG1T 0-9 


Q2A00H 
Q2A06H 
2A09H 
SSOBH 


START OF BASTC 

END OF BASIC POINTER 
END OF MEMORY POINTER 
END OF PROG POINTER 


OF EPRGP IS ADDRESS OF O1 BYTE AT PROG END 
02000H START OF DOS 

HOSST+028H HOT START POINT FOR DOS 

20H 


2 


HO 
sp 
LSTK 
SPySTK 
STORE 
7A! 
nos ESCAPE 
ee | 
nos ESCAPE 
41H SHIFT FOR ALPHABET 
A DOUBLE 
EvA SAVE IN E 
D0 ZERO LD 
Hy EPRGP 
CoM 
H 
ByM ByC NOW HAVE END PROG ADDRESS 
B PLUS 1 FOR TABLE START 

GET SHIFT IN Hel 
R AND IN ALDRESS 
Eom GET LOW ORDER RYTE 
H 
DyM HI ORDER BYTE 

PUT IN HL 


FIRST CHAR 


STORE+2 

“et STRING 7 

STRNG 

hd ARRAY 7? 

ARRAY 

BLNK SCALAR ? 

nos 

CODER 

RySOH 8 IN LEFT NYBRL iC 
CONTI 

Be20H 2 IN LEFF NY BBLE 
CONTL 

Bred 2 IN LEFT NYBBLE 
STORE+L SECOND BYTE 
BLNK KLANK 

CONT2 

Oe TEST IN RANG! 
bos 

ie | 

Dos 

30H SHIFT FOR ASETI 
CONTS 
ArOFH 
BR 
CObE 


"** DENuUI]UOCO SSIQEHUBA JBIS YON 


SCALAR CULE 


GHVO SDIANSS YAGV3SHY NO tv ATOUID 


1720 SRCH LDA CODE GET GONE 

1730 CMP OM TES) FOR MATCH 

1740 = Fd DONE FOUND IT? 

1750 INX H NEXT BYTE 

17690 MOV EyM LOW ORDER BYTE 

1770 INX H 

1780 MOV DyM HL ORDER BY IE 

1790 XCHG FUT NEW ADURESS IN Hel 
1800 MOV) AvH 

1810 CPI Oo ZERO? 

1820 JNZ SAFE 

1830 MOV ArL 

1840 CrI Oo 

1850 AZ LOS 

1860 DCR C 

1870 JZ bos 

1880 JMP  SRCH TRY AGAIN 

1890 DONE XCHG SAVE HL WHILE RESET? 
1900 LHLD 

1910 SPHL RESET STACK 

1920 XCHG RECOVER FOR iE TURN 
1930 RET 

1940 STK EQU 5 STACK FOR THIS PROG 
1950 CODE DS 
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1200 STORE 1 SBAS 2A00 EBASP 2A06 

FP 2A09 EPRGP 55 DOSST 2000 DOS 2028 
0020 LSTK 1 GOFT 1208 START 1212 

1232 STRNG ARRAY 124C CODER 1251 

CONT1 1253 CONT2 CONTS 126C SRCH 1270 
SAFE 1288 DONE 1 STK 1L2R6 COLE 1296 


1% 


aiaymAue ANTWA 3S2q ay} 


saysueiy ayy pue jeuruuay eUS KWWOD e 


GZS [enuew paleyeq =OST$ 2SU221] dd e 


EXEC 2028 
*xGO FPBASIC:2 
READY 


dnyury Aseq 10} saji-4 uobo7 pue jeig oyny 


10 19]29q [2207] ino, yDe}U0y 
‘uoissaidwo 


Listing 4 


VSN 606L-8b£/ 


STORTEST MARCH 1982 

LABEL=7H# 

CHECK X#: 48 20 24 

CODE BYTE FOR H % IN ADDRESS (DEC) 26674 »(HEX) 68 34 
CONTENTS OF CONE BYTE: 8F 2 
POINTER TO NEXT ENTRY IN TABLE $LO BYTE = 44 HI BYTE = 68 
STRING DIMENSION= 9» HEX:LO BYTE = 09 HI BYTE = 00 
LENGTH= 6» HEX:LO BYTE = 06 HI BYTE = 00 

STRING CONTENTS # “7° MARKS END OF ACTUAL LENGTH 

IN ASCII - ONE SPACE BEFURE AND AFTER EACH CHARACTER 
Lim 3 AS SF 

IN HEX 

31 «32 33 34 35 346/ 20 20 20 

LABEL=?7A 

CHECK X#% 41 20 20 

CONE BYTE FOR A IN ALIRESS (DEC) 246822 »(HEX) 68 C& 
CONTENTS OF CONE BYTES OF 

SIMPLE VARIAPLE --- 

POINTER TO NEXT ENTRY IN TABLE $LO BYTE CE HI BYTE = 68 
DATA AT CODE BYTE ADIR + 2 

MANTISSA $ 23 40 00 00 SIGN/EXPONENT 42 VALUE= 23.4 
LABEL=729¢ 

CHECK X%$3 SA 39 28 

CODE BYTE FOR Z9¢ IN ADDRESS (DEC) 26605 »s{HEX) 67 ED 
CONTENTS OF CODE BYTE: 29 

POINTER TO NEXT ENTRY IN TABLE 310 BYTE = 00 HI BYTE 
BYTE COUNT IN ARRAY= 60 LO BYTE = 3C HE BYTE = 00 
DIMENSION( 1)41 = 3 LO BYTE O3 HI BYTE = 00 
DIMENSION( 2)+1 = 4 LO BYTE = 04 HI BYTE 60 
DIMENSION( 3)+1 = O LO BYTE = 00 HI BYTE oo 

2 DIMENSIONAL ARRAY 

DATA ELEMENTS ~ LAST DIMENSION VARIES MOST RAPIDLY 
MANTISSA 0 oo” SIGN/EXFPONENT VALUE= 
MANTISSA 2 00 SIGN/E “PONENT VALUE= 
MANTISSA " S1GN/EXPONENT VALUE= 
MANTISSA D ) SIGN/E APONENT VALU! 
MANTISSA 00 $1 GN/EXPONENT VALUE= 
MANTISSA SIGN/EXPONENT ¢ VALUE= 
MANTISSA 2 C SIGN/EXPONENT VALUE 
MANTISSA 0 6 4 v SIGN/EXPONENT ¢ VALUE 
MANTISSA C O SIGN/EXPONENT VALUE 
MANTISSA . » 00 SIGN/EXPONENT 

MANTISSA C » 00 00 SIGM/E*XPONENT 

MANTISSA C SIGN/EXPONENT 

LAKEL=?Y 

CANNOT USE NAKES BEGINNING WITH “Y’ HERE 

LABEL=?HO 

CHECK X#:3 48 30 20 

* 
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A NEW BOOK 
DEALING WITH 


ASSEMBLY 
LANGUAGE 
FOR CP/M® 


SYSTEM USERS 


CP/M is a registered trademark 
of Digital Research, Inc. 


Introduction to CP/M Assembly 


Language is a step-by-step instruc- 

tion manual on how to construct 

simple programs operating in CP/M that work! 

The full size (8x11) perfect-bound 180 pages present the 
reader with various ways of inputting and outputting data to a terminal, 
as well as sending data to a line printer. Since the I/O methods used 
are based on CP/M function constructions, the programs are meant 
to be interchangeable with “standard” CP/M systems. The reader can 
immediately “talk” with his computer in assembly language. Only 
minimal prior exposure to assembly language is required. Two 
useful programs are constructed to demonstrate CP/M techniques: 
Single-drive copy program (sequential filing); Data base program 
(random access filing). Also included is a simple game program 
demonstrating some basic game programming techniques and a short 
section on program troubleshooting. 


TO ORDER SEND: $15.95 PLUS $1.25 FOR POSTAGE AND HAND- 


LING (EUROPE—ADD $7.00 FOR POSTAGE) (CALIFORNIA RES. 
ADD 6% SALES TAX) TO: 


EXECUTIVE COMPUTER 


DEPT. G, P.O. BOX 222178, CARMEL, CA 93922, (408) 272-4800 


CIRCLE 92 ON READER SERVICE CARD 


TECHTYPE 


You need to write no-pyccku? nay %En espanol? 
Or worse yet -- it, HEE 7S - 
; Ma _ 
PimicoS ®) = ae aR | al (nr 1) 
2” nl! am 


Your present word processing system isn't exactly a 
polyglot and flunks algebra? What's the solution? 


TECHTYPE™ is a text-formatting system designed espe- 
cially for setentific, engineering, mathematical, and 
multi-Lingual document preparation. TECHTYPE runs 
under CP/M® and is adaptable to most hardware. By us- 
ing your present editor and its three programs 


@ DISPLAY - Preview on CRT screen 
@ DRAFT - High-speed dot-matrix printout 
@ PRINT - High-quality daisywheel printout 


you can spend more of your time solving equations in- 
stead of typing them. 


TECHTYPE's capabilities include: 


@ Multiple type fonts 

@ Multipass printing 

@ Unlimited sub/superscript levels 

® Control of format, font, pitch, and emphasis. 


Multipass printing allows the use of up to ten dif- 
ferent fonts with only one printwheel change per 
page per font. Price $300. 


GREEN MOUNTAIN RADIO 


RESEARCH COMPANY 
240 Staniford Road 
Burlington, Vermont 05401 U.S.A. 

802-862-0997 
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HENRI! DE 
@ eit, TOULOUSE 
| ecome = / AUTREG 


IMPOSSIBLE? NOT WITH 


SMARTKEY! 


SMARTKEY™ is a unique utility that can redefine any ASCII 
character or function key to become anything you want. For 
example, “#” becomes “pip b:=a:+.pas[v]”. With a single 
stroke, a key can represent a chosen character or string at the 
system level or within a program. Instantly. Without rewiring 
or soldering. 

SMARTKEY™ is completely transparent to the user. It resides 
on the top of memory and intercepts calls to the BIOS, trans- 
lating system input to whatever you desire. You can even 
change a key definition while another program, such as 
WordStar™, is in operation . .. without interruption! It’s perfect 
for programming, data entry or word processing. 
“EXCELLENT” InfoWorld 
“VERSATILE AND RELIABLE” Lifelines 
“WORKS LIKE A CHARM” Microsystems 
Think of the acceleration in productivity. Think of the 
versatility in keyboard layouts. Think of the possibilities. And, 
best of all, SMARTKEY™ is only $60. 
Ask about SMARTPRINT™, SMARTSCREEN™, SPOOL™ 
and other programs. 


To order or obtain more information, call or write to: 


HERITAGE SOFTWARE, INC. 


2130 S. Vermont Ave., Los Angeles, CA 90007/(213) 737-7252 
SMARTKEY™ is compatible with all standard versions of CP/M.™ 


Programs copyrighted by FBN Software. 
WordStar™ is a registered trademark of MicroPro, Inc. @ 
CP/M™ is a trademark of Digital Research. 
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MICE 


MCP 64KS (64K X 8) STATIC S-100 MEMORY incall BG 
Sixty-four k bytes of low power high performance (2k x 8) 150ns FS, i 
static ram for systems requiring the ultimate in reliable perfor- 

mance. Extended address capability to one megabyte is provided. *“~* 
ASSEMBLED AND TESTED LIST $390.00 YOUR PRICE $238.00 


MAKES 
HIGH PERFORMANCE 
S-100 AFFORDABLE 


HIGH PERFORMANCE MCP/SCC-6 Z80B 6MHz S-100 CPU 
Operates at 2,4, or 6MHz. Includes two serial ports using 8251 s 
usarts with selectable baud rates from 50 to 19.2k, Three pro- Bas 


Eprom with monitor. Onboard ram and eprom can be disabled J 
on system boot. 
ASSEMBLED AND TESTED LIST $350.00 YOUR PRICE $200.00 


MCP/FDC DOUBLE DENSITY 8" S-100 FLOPPY DISK 
CONTROLLER 

Utilizes the WD1793 double density F/D controller chip and the 
WD1691 floppy support logic chip. The MCP/FDC offers superb 
performance and reliability due to enhanced data recovery and 
write precomp support. The MCP/FDC will support up to four 
8"’ single or double sided Shugart, Qume, Siemens or compatible 
drives. CP/M 2,2 Bios supplied on standard density 8” diskette. 
CP/M86 and MS-DOS operating systems with MCP/FDC sup- 
port available. CP/M 2.2 Bios with MCP/FDC and Miniscribe 
5.25 winchester using Xcomp hard disk controller is also 
available. 

ASSEMBLED AND TESTED LIST $288.00 YOUR PRICE $200.00 


CP/M 2.2 CONFIGURED FOR MCP S-100 BOARDS $130.00 


COMPLETE MAINFRAMES SEVEN S-100 SLOTS CONFIGURED READY TO RUN. 
Six MHz MCP/SCC-6 Z80B, with serial and parallel ports, MCP/FDC double density disk 
controller, MCP 64ks static memory and CP/M 2.2. 

WITH TWO 8" SSDD FLOPPYS 

WITH TWO 8” DSDD FLOPPYS 

WITH 8” SSDD FLOPPY & 5.25 WINCHESTER (7.6MB FORMATED) 
WITH 8” DSDD FLOPPY & 5.25 WINCHESTER (15.7MB FORMATED) 


6992 El Camino Real - Suite 104-444 
Carlsbad, CA 92008 
COMPUTER PRODUCTS Phone: (619) 438-3270 
MASTER CHARGE AND VISA ACCEPTED 
CP/M IS A REGISTERED TRADEMARK OF DIGITAL RESEARCH 
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If your thirst for technology is combined with an interest in the IBM Personal 


A N N O U N C 


~ TECH 


OURNAL 


To The Limits... 
And Beyond 

As you well know, the IBM 
Personal Computer is prov- 
ing to be the success story of 
the 1980s. Only 18 months 
after its introduction, the IBM 
Personal Computer com- 
mands almost a fifth of all 
personal computer sales— 
a remarkable achievement. 
At present the number of 
IBM Personal Computers 
in users’ hands exceeds a 
quarter-million, with perhaps 
as many as half a million on 


the way in the next 12 months. 


But despite its widespread 
public acceptance and the 
wealth of products now avail- 
able to support it, we are 
convinced that vast areas of 
its potential remain unex- 
plored, not to mention those 
products waiting to be intro- 
duced for which the IBM 
Personal Computer is the 
precursor. 

For those serious enough 
about microcomputers to 
accept the challenge, the 
IBM Personal Computer rep- 
resents a host of untapped 
possibilities. 


FOR IBM 


For those with 

a genuine appetite 
for technology, there 
are ways of stretching the 
IBM Personal Computer to 
the very limits of its specifica- 
tions. Ways to willfully expand 
those spécifications...to 
throw light into the dark 
recesses of its complex soft- 
ware systems. Ways to 
enlarge our understanding 
of the equipment and to 
increase its usefulness. 

If this sounds appealing, 
then PC Tech Journal is for 
you. For it will be the defini- 
tive source of authoritative, 
technically-satisfying informa- 
tion about your IBM Personal 
Computer, its future transfor- 
mations and the host of 
products developed to 
support it. 


PERSONAL 


COMPUTER USERS Us ERS 


Why a Technical 


Journal? 


The readership of PC Maga- 


zine has, in the last year, 
grown at a rate to match the 
success of the IBM Personal 
Computer itself. But as the 
number of committed 
readers has expanded, so 
has that portion of users who 
are not only interested in out- 
put—that is, using the IBM 
Personal Computer to better 
solve problems—but who 
care deeply about the pro- 
cess of the computer itself. 
We consider you to be 
among that select group of 
readers. Your relationship 


Pe 


N G 


with microcomputers, voca- 
tional or otherwise, has led 
you to levels of technical 
competence and curiosity 
which go far beyond prob- 
lem-solving. In effect, you 
have a compelling interest 
not only in what your IBM 
Personal Computer does, 
but also how it does it and 
how it can do more. 

For you, technological 
sophistication is a welcome 
challenge, perhaps even 
something of an adventure. 

In both its depth and 
breadth of applicable sophis- 
tication, we are confident 
that you will find PC Tech 
Journal a fitting match for 
your aspirations. 


Computer you will want to take part in exploring its vast technological landscape. 


Enroll now 
as a Charter Subscriber 
at a special Charter rate 
...and get your own copy 
of our Premiere Issue. 


A Select Audience 
Needless to say, PC Tech 
Journal is not for everyone. 
But among PC Magazine's 
current audience is a sizable 
segment where PC Tech 
Journal will find an active, 
committed readership: 


Practicing professional 
developers who will want allow them to enhance their 
to read the Tech Journal use of their IBM Personal 

for information they can’t find Computer. 

anywhere else. And, of course, anyone 
Serious programmers— __ with a genuine appetite 
both full-time professionals for state-of-the-art infor- 
and non-professionals mation about the emerging 
alike—with a clear interest possibilities presented by the 
in expanding the range IBM Personal Computer. 
and utility of software com- A Menu for 
patible with the IBM Personal 
Computer. 


Management and staff 
serving in MIS and DP 
roles with a requirement for 
intimate knowledge of the 
s working 
processes 


Independent businessmen 
and professionals who 
understand the increased 
benefits of tailoring their IBM 
Personal Computers to their 
own specific demands. 
Members of the scientific 
and academic community 
whose ability and training 


Under the leadership of Edi- 
tor-in-Chief Will Fastie, author 
of the widely respected 
“IBM Images” colurhn in 
Creative Computing Mag- 
azine, we’ve assembled a 
staff and a stable of regular 
contributors all with just 
the sort of demonstrated 
expertise you'd expect 
from PC Tech Journal. 
Every bimonthly issue will 
be filled with useful articles 
on subjects such as... 
@ How to fully exploit—or, if 
necessary, avoid—the com- 
plexities of BIOS, the IBM 
Personal Computers 
installed firmware. 


Computers. 


e Detailed examinations of 
component hardware avail- 
able for the IBM Personal 


PC is a trademark of PC Communications Corp., a subsidiary of Ziff-Davis Publishing company. 


Technical Gourmets 


intent that you, our readers, 
play an important part in 
shaping the magazine. 


Computer, including multi- 
function cards, display 
devices, laboratory data 


acquisition equipment and For we are convinced that 
voice recognition and syn- it will be you who shape the 
thesis devices. future usefulness of the IBM 


Personal Computer itself. 

To that end, we will make 
a special effort to involve you 
in the focus of the magazine, 
listening to your needs and 
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Preventing System Crashes 
During Warm Boot 


by Michael F. Sasso 


ou have a CP/M 2.2 system up and run- 

ning, and you need to change the A disk. 

You remove the current disk, insert the 

new disk, and type control-C to perform 

the required warm boot. The disk indica- 
tor light comes on, then goes off, but no prompt is 
displayed. The new disk was not a system disk, and 
the system has crashed. 

Don’t be surprised if the above sounds familiar. It 
was happening to me more often than I care to admit. 
Then I realized that there are not that many causes 
of system crashes during warm boot, and that they 
can easily be detected in time to prevent a crash from 
occurring. 

There are three principal reasons for warm boot 
failure. These are: 


1. A disk error occurs while reading the system 
from the new disk; 

2. The disk being booted is not a system disk; 
and 

3. Although the disk being booted is a system disk, 
the system contained on the disk is not config- 
ured for the same memory size as the system 
that is running. 


The first case is usually detected by checking disk 
status after each disk read operation; in the event of 
an error, the user is given the opportunity to remedy 
the situation before any harm is done to the system. 
In the other cases, however, the nonexistent or incom- 
patible system is loaded and jumped to, causing a sys- 
tem crash. I will describe a procedure for detecting 
those other cases and requesting operator interven- 
tion before the system is destroyed. 

My method is based on the fact that the CCP, 
which is the first part of the system to be reloaded 
during a warm boot, begins as follows: 

CCP: JMP CCP+35CH 

JMP CCP+358H 

We can decide both if the new disk is a system disk 
and if the system configuration is correct during a 
warm boot by loading only the first sector of the CCP 
and examining the data that have been loaded. If the 
sector begins with two jump instructions, we can be 
fairly certain that the disk is a system disk. If the 
address contained in the first jump instruction equals 
the address of CCP+35CH for the current system, 
we can conclude that the configuration size is correct. 
If both conditions are satisfied, we can safely load the 
rest of the CCP and BDOS and branch to the CCP. 
Otherwise we will remain in the BIOS and inform the 
operator of the problem. The operator must then pro- 
vide a new disk that will boot properly, and the boot 
can be retried. 

The code presented in Listing 1 will do the loading 
and testing described above. Subroutines SETDMA, 
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SELDSK, SETTRK, SETSEC, READ and CONIN 
are BIOS entry points that work as described in the 
CP/M 2 Alteration Guide from Digital Research. 
Subroutine PRMSG is assumed to be a routine to 
send a message whose starting address is contained in 
HL to the console. It is shown in Appendix B of the 
Alteration Guide. The example assumes that track 0 
sector 1 of the disk is reserved for a boot loader, and 
the sector to be loaded and tested is track 0 sector 2. 
This will not be true for all systems; be sure to test 
the appropriate sector for your own system. In order 
to avoid cluttering up the example unnecessarily, the 
sector to be tested is assumed to read correctly; how- 
ever, a test for a read error should be added (see the 
example in Listing 1). 

I still insist on trying to warm-boot disks that 
aren’t system disks. Now, however, I get an error 
message and a chance to correct the situation instead 
of a guaranteed system crash. 


3 Select the A-disk 
Select track 0 


3; Select sector 2 


> 
> 
> 


SELDSK 
SETTRK 
SETSEC 


3; Place this code at or near the beginning of the warm boot routine 
CALL 
CALL 
CALL 


3; in the BIOS, just before the point where the system is reloaded. 
; Read the first sector of the CCP 


TESTDISK: 


Lor 


CALL  SETDMA ; Set the DMA address to the start of the CCP 


CALL READ ; Read the first sector of the CCP 


insert test for read error here 


; Test for system disk 


LXxI H,NOSYS ; Get addres of error message, just in case 
LDA ccP 

CPI 0C3H Does CCP start with a jump? 
JNZ DSKERR Branch to error routine if not 
LDA CCP+3 
cPL 0C3H Is there also a jump at CCP+3? 


JINZ DSKERR Branch to error routine if not 


; Disk is system disk. Test for configuration match. 


Error 


LHLD CCP+1 ; Get address to which new system jumps 

XCHG 3 Move it to DE 

LXI B,CCP+35CH ; Address to which it should jump 

LXI H,SIZERR ; Get address of error message, just in case 
MOV A,B 

CMP D 

JNZ DSKERR 

MOV A,C 


CMP E 


DISKOKAY ; If BC = DE we have configuration 


routine. Display a message and wait for the operator to type 


3; a key on the keyboard. Then retry the warm boot. The address of 


; the message is contained in HL. 


DSKERR: 


CALL PRMSG 3; Go display error message 


CALL CONIN ; Wait for operator to hit a key 


JMP TESTDISK ; Go try again 


; Error messages 


NOSYS: 


CR,LF 
‘Not a system disk’ 


CR,LF,O 


CRLF 


‘Configuration size mismatch’ 


CR,LF,O 


If this point is reached it has been determined that the A-disk is 


a system disk that is configured for the same memory size as the 


; running system. The warm boot can be completed. 


DISKOKAY: 
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Enhancing Your Spreadsheet 
Print Files 


by Tom Wiens 


ar be it for me to criticize the spreadsheet 

programs, which have brought liberation to 

the number cruncher from the most tedious 

aspects of his routine, just as automation 

and robots have done for the factory work- 
er. Well, almost: there is still a stage between the 
creation of a financial model and its presentation in 
finished form, where I must take to the word proces- 
sor (or hand it to a secretary) to apply a bit of polish. 
Aside from adding headings and footings, lengthen- 
ing labels, adding blank lines, and underlining, num- 
bers must be aligned, zeroes must be added before 
decimal points, commas must be added to numbers 
greater than 999, and the number of significant digits 
must be adjusted so that the results appear no more 
precise than my assumptions justify. Perhaps some- 
day new versions of spreadsheet programs will do 
more of this for me, but in the meantime some drudg- 
ery remains which ought to be done by a robot of 
modest intelligence. Being a lazy number cruncher, I 
couldn’t wait, and so I developed a short program in 
MBasic (given in Listing 1) that may save you some 
tedium. 


Program functions 
Its primary purpose is really to round the numbers in 
tables to the extent warranted by their imprecision. It 
takes as input a disk file such as a spreadsheet .PRN 
file, or any other table for that matter, processes it 
according to the user’s instructions, and returns to 
disk B: a file with the extension .RND. You can 
choose automatic or manual operation. If the first, 
you can relax over a cup of coffee while it flashes 
each line of the table at you, in original and rounded 
form. If the prospect of a mangled table makes you 
nervous, you can choose “manual.” It will pause after 
the display of each line, awaiting your approval (a 
carriage return), a signal not to mess with all follow- 
ing lines (ESCAPE), and/or your editing. As the in- 
put file is not erased, nervousness is unwarranted. 

As pattern recognition is not my computer’s forte, 
the instructions it is given required some initial 
thought. Some of these are built into the program: It 
is told to ignore numbers between 1950 and 2000 
with no decimal point or comma, for obvious reasons 
(statements 440-450). It will place a zero before a 
decimal point if one is omitted, will add one comma 
to numbers exceeding 1,000 (but ignore the millions 
place). It will cut out unnecessary zeroes to the right 
of the decimal place and drop the decimal point if 
unneeded. It ignores numbers that evaluate to zero 
(at least most of the time!), so that dimensional state- 
ments like ’000s don’t get mangled. 

On the other hand, some decisions are better left to 
the user. Column and row headings often contain 
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numbers that should not be rounded, so the user is 
asked how many lines to skip at the beginning of the 
file and how many columns to skip from the left of 
the table (“‘width of row label field’’). The user may 
choose the rounding target: 5, 10, 50, or 100 are per- 
missible alternatives. If T is the target, the program 
examines the rightmost digit (or two digits if T > 
10) to decide whether to round up or down to the 
nearest target value. It does not care whether the dig- 
its are before or after the decimal point, so if T = 10, 
156 will round to 160, 1.56 to 1.60, 156.00 to 156.00. 
This is a bit rigid, so the user may also choose a “‘min- 
imum size in digits for rounding,” so that if numbers 
like 1567 and 0.7 exist in the same table, the latter 
could be left as is. 

Indeed, by making the minimum size greater than 
any number in the file, the rounding function can be 
skipped entirely (if, for instance, you just want to in- 
sert commas). Also, the user might choose to ignore 
numbers with decimal points, or to truncate all digits 
to the right of the decimal point after rounding. The 
program will fill in the extra spaces required to keep 
decimal points aligned where they were in the first 
place. 

If the variety of options has you lost, study Listing 
2 to see what the program does with a sample table. I 
should also warn that the program sometimes hits a 
case it can’t handle properly; if so, run it again on 
“manual” and make the correction yourself. 


How the program works 

A word about how the program operates: A line of 
the input file is read into a string A$. From left to 
write, it searches for the beginning of a number and, 
when it finds one, identifies its end and all compo- 
nents, including signs, comma, decimal point, and 
numbers of digits on either side. The number itself, 
with all its paraphenalia removed, is converted from 
string D$ to an integer. The program tests for various 
exceptions, but otherwise rounds the integer appro- 
priately, and finally puts Humpty Dumpty together 
again. The string D$ that contains the rounded num- 
ber is concatenated onto the right of storage string 
B$, and the process continues until all of A$ has been 
processed. After displaying and allowing user 
changes (if not on auto), B$ is written to disk. 

The section of the program beginning at line 790 
is a line editor that employs the screen editing and 
positioning controls of the Osborne I or Televideo 
920C terminal. The control codes corresponding to 
the arrow keys (lines 810-850) and the sequence 


<ESCAPE> = yposition xposition 


used to position the cursor (lines 760-770) may be 
adjusted for terminals with different screen control 
sequences. They should function as follows: when the 
original and rounded lines are displayed, the cursor is 
left positioned at the beginning of the line. Right and 
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SYSTEM 816/A ........$4260. 
128K, Retail $5495 


SYSTEM 816/B ........$5150. 
256K, Retail $6995 


SYSTEM 816/C ........ $6660. 
384K, MP/M 8-16, Retail $8995 
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PROGRAMMERS 


“C” LANGUAGE programmers 
were surveyed. The products featured below are what they preferred. We carry all 
MSDOS & CPM software & addons for programmers. 
If we don’t stock it, we'll find it-at a discount. 
Products for “C” Programmers Our 
Price 
Compilers: All have library source, no royalties 
8080 - BDS C - compile in memory, good library 
280 - EcoSoft C - Full K&R, fast code., .REL files 
APPLE - Aztec C - Float, doubles, editor included 
8086 - C86 - PCDOS/CPM-86 - Full K&R, OPTIMIZER with ASM out 
8086 - Lattice - PCDOS - Full K&R 
Editors: 8080 & 8086 - C Screen Editor w/source 
VEDIT/PC and CPM-80 
VEDIT/86 
Utilities: 8080/8086 - POWER - 55 programs 
MICROSHELL - add UNIX features to CPM-80 
CACHE/Q - CPM-80 & PC - automatic RAMdisk, spool, 
makes all run faster 
UT-86 - Patch, List, etc. 8080 emulator 
Communications: ASCOM - 8080/86 - flexible, powerful, main frame 
& micro 
HAYES Smartmodem 300 
Smartmodem 300/1200 
Diskettes: We carry all brands. Convenient service 
Double Sided, Double Density - 8 inch 
- 5.25 inch 48 TPI (PC) 
Single Side, Single Density - 8 inch 
- §.25 inch (APPLE) 
Printer: 100 cps - all features of MX80 FT, ProWriter 
Call for the Programmer's Referral List, a catalog, literature, advice or prices. We're here 
to help. Add $2.50 for shipping. 


THE PROGRAMMER’S SHOP™ 


135 Main Street, 3M 
Maynard, MA 01754, 617-897-4750 


800-421-8006 
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EM ¥¥X NUMERICAL ROUNDING PROGRAM XxX 
EM XXX by Thomas B. Wiens KER 
Ae SSSSSESSISSS SESS LESES SS ESS TSS TTS SS | 
DEFDBL N 
PRINT CHRS(26) 
PRINT “TABLE ROUNDING PROGRAM" 

PRINT * by thomas b. wiens" 

INPUT "FILENAME (DISK B: ASSUMED) ";F$ 
OPEN "I",1,"B:"+F 

FS=LEFT$(FS%,LEN(FS) -4) 

INPUT "AUTOMATIC OPERATION (Y/N) ” ;ATOS 

INPUT "SKIP FIRST x LINES: ENTER x"5L1 

INPUT “WIDTH OF ROW LABEL FIELD" ;L2 

INPUT “ROUNDING TARGET (5,18,58, OR 168)" ;T 

ROUNDLEN= 1 

IF T>1@ THEN ROUNDLEN=2 

INPUT "MINIMUM SIZE IN DIGITS FOR ROUNDING (@,1,2,3)"5D 
INPUT “IGNORE NUMBERS WITH DECIMALS (Y/N) ";IGDECS 

IF IGDEC$="Y" THEN NODEC$="N":GOTO 198 

PRINT "TRUNCATE ALL TO RIGHT OF DECIMAL“ 

INPUT "AFTER ROUNDING (Y/N) * ;NODECS 

OPEN '0*,2,"B:"+F$+" .RND* 

IF EOFC1) THEN 926 

FOR I=1 TO Lis LINE INPUT #1,A$:B$=A$:PRINT #2,B$:NEXT I 
IF EOFC1) THEN 926 

LINE INPUT #1,A$% 

Bg="" 

FOR I=1 TO LEN(AS$) 

REM FIND FIRST NUMBER 

C$=MIDS(A$,1, 1) 

IF I<L2 THEN BS=B$+C$:GOTO 716 :REM SKIP L2 COLUMNS 
A=ASC(C$) : REM ASCII VALUE OF ITH CHARACTER 

IF NUMBER THEN 3386 

IF AC48 OR ADS7 THEN BS=B$+C$:GOTO 718 REM TO RETURN 
NUMBER=- 1:D$=D$+C$:GOTO 716 :REM TO RETURN WITH SWITCH SET 
IF A=44 THEN COMMA$=",":COMLEN=LEN(D$) :GOTO 718 

IF A>47 AND ACS8 THEN D$=D$+C$:GOTO 718 sREM TO RETURN 
IF A=46 THEN DEC$="." :LEFT=LEN(D$) :GOTO 718 :REM TO RETURN 
IF RIGHT$(8$, 1)="-" THEN BS=LEFT$(B% ,LEN(B$) -1) :D$="-"+D$ 
IF RIGHT$(B$,1)<>"." THEN 388 

BS=LEFT$(B$ , LEN(B$) -2) :D$="@"+D$:LEFT=1:DECS="." 

REM END OF NUMBER REACHED 

NUMLEN=LEN(D$) :NUM=VAL (D$) 

IF LEFT=@6 THEN LEFT=NUMLEN 

RIGHTDIG=VAL (RIGHT$(D$ , ROUNDLEN)): REM RIGHTMOST DIGITS 
IF NUM=@ THEN 68@: REM IGNORE DIMENSIONAL STATEMENTS LIKE ‘808 
IF NUMLENCD THEN 518 
IF COMMAS="," OR DECS="." THEN 468 

IF NUM> 1956 AND NUM¢288@ THEN 688: REM DON’T ROUND YEARS 

IF IGDEC$="Y" AND DEC$="." THEN 518 

R=RIGHTDIG/T 

IF R¢.S THEN NUM=NUM-RIGHTDIG:GOTO 518 :REM REASSEMBLE NUMBER 
IF R>=.5 AND RC1.5 THEN NUM=NUM-RIGHTDIG+T: GOTO 518 REM REASSEMBLE 
IF R>=1.5 THEN NUM=NUM¢+ 2XT-RIGHTDIG 


92 
:REM NUMBER TOO SMALL FOR ROUNDING/REASSEMBLE IT 


REM REASSEMBLE NUMBER 

H$=STRS (NUM) 

IF NUMLEND=LEN(H$) -1 THEN 568 

NUMLEN=NUMLEN¢ 1: LEFT=LEFT+ 1 

BS=LEFT$ (BS, LEN( BS) - 1) 

H$=LEFT$ (D$ ,NUMLEN-LENCH$) + 1) #RI GHT$ (HS ,LENCH$) - 1) 

IF LEFT>3 AND COMMA$="" THEN COMLEN=LEFT-3:COMMAS="," :B$=LEFT$ (BS ,LEN(B$) -1) 
IF LEFT=@ THEN H$="@"+H$:LEFT=1 :NUMLEN=NUMLEN¢ 1 
DIFF=LEFT-COMLEN 

IF DIFF<1 THEN STOP 

RHS$=DEC$+RI GHT$ (HS ,NUMLEN-LEFT) : RHS=INT (LEN(RHS$) /2) 

IF NODEC$="Y" AND DEC$="." THEN B$=B$+SPACE$(RHS) : RHS$=SPACE$(LEN(RHS$) -RHS) 
IF RHS$="" OR NUMLENCD OR T=5 THEN 676 

IF T¢18@ THEN 2T=1 ELSE 2T=2 

IF LENCRHS$)=ZT+1 THEN 2T=2T+1 

RHS$=LEFT$(RHS$ , LEN(RHS$) -2T) +SPACE$(2T) 

D$=LEFT$(H$ , COMLEN) + COMMAS +M1ID$ (HS , COMLEN+ 1, 01FF) +RHSS 
BS=B$+D$ : COMMAS="" : DEC$="" : LEFT=@ :NUMBER=8 : COMLEN=6 :D$="" :H$="" 
WIDTH 255 :REM INFINITE WIDTH SO NO AUTOMATIC CARRIAGE RETURNS 
IF IC>LENCA$) THEN BS=B$+C$ 

IF I=LEN(A$) AND NUMBER THEN 388 

NEXT I 

IF LEFT$(A$, 1)=CHR$(13) THEN 898 

PRINT CHR$(25) :PRINT CHR$(27)+"=+ "3 

PRINT A$:STP=31:INDX=1 

PRINT CHR$(27)+"=, *;B%:STP=STP#1 

PRINT CHR$(27) +"=,"+CHRS(STP) ; 

IF ATOS="Y" THEN FOR I=1 TO 5@:X=12345*2:NEXT 1:GOTO 8978 
STAT=ASC( INPUT$<¢ 1) ) 

IF STAT=27 THEN 871 :REM ESCAPE 

IF STAT=12 THEN 872 :REM RIGHT ARROW, OSBORNE ARROWS SET FOR CP/M 
IF STAT=8 THEN 873 :REM LEFT ARROW 

IF STAT=13 THEN 898 :REM CARRIAGE RETURN 

IF STAT=11 THEN 874 :REM UP ARROW 

IF STAT=18 THEN 875 :REM DOWN ARROW 

BS=LEFT$(B$ , INDX-1) *CHR$ (STAT) +RIGHT$(BS , LEN( BS) -INDX) 
INDX=INDX+1: GOTO 768 

Li=é66 : GOTO 268 

INDX=INDX+1 : GOTO 768 

INDX=INDX-1: STP=STP-2 : GOTO 7468 

BS=LEFT$(B$, INDX-1) +" "+RIGHT$(BS,LEN(B%) -INDX+1) : GOTO 888 
BS=LEFT$(B$, INDX- 1) +RIGHT$(B$ ,LEN(B$) -INDX) : GOTO 888 
STP=STP-1: GOTO 768 

PRINT #2,B% 

PRINT 

GOTO 228 

END 
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Spreadsheets continued . 


While the program code is not particularily ele- the BASCOM compiler. It offers some good exam- 
gant, consisting mostly of logical tests and branches, ples of string manipulation using Basic, and of use of 
it should be possible to combine this description with screen control codes to build a simple line editor into 
the comments in the listing and modify it to suit your the program. Most important, it eliminates some of 
own numerical formatting requirements. The pro- the last remaining bits of drudgery faced by the pro- 
gram can be greatly speeded up by compiling it with fessional number cruncher. o 


-556 


5578 
5,688 6.4 
x3 x4 

688 8.4 
5,608 @.1 


will not be rounded if 
S; 


will not be rounded if 


55.788 
55.3 
a 


55.8 


ENTER x? 2 


numbers such as 1.568 will not be rounded if 
x1 
56 
8 


numbers such as 1.568 will not be rounded if 


ROUNDING A SAMPLE FILE 


should be rounded. 
numbers such as 1.6 


numbers such as 1.6 
one is in manual mode and presses ESCAPE after the last 


one is in manual mode and presses ESCAPE after the last 
one is in manual mode and presses ESCAPE after the last 
X2 


line which 
one is in manual mode as presses ESCAPE after the last 


IGNORE NUMBERS WITH DECIMALS (Y/“N)? N 
line which should be rounded. 


TRUNCATE ALL TO RIGHT OF DECIMAL 


AFTER ROUNDING (Y/N)? N 

line which should be rounded. 
line which should be rounded. 
A Sample Unrounded Table 

A Sample Unrounded Table 


by thomas b. wiens 


FILENAME (DISK B: ASSUMED)? MODEL.PRN 


AUTOMATIC OPERATION (Y/N)? Y 


File B:MODEL.RND 


Footnote: 
Footnote: 


MINIMUM SIZE IN DIGITS FOR ROUNDING (@,1,2,3)? 2 
Footnote 
Footnote: 


AMBASIC ROUND [CR] 

TABLE ROUNDING PROGRAM 

SKIP FIRST x LINES: 

WIDTH OF ROW LABEL FIELD? 5 

ROUNDING TARGET (5,16,5@ OR 160)? 198 
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EMPROM-1: 
Eprom Emulator /Programmer 


INTRODUCING the EMPROM-1 


The MATCO Eprom Emulator/Programmer EMPROM-1 is a 

sophisticated tool designed to support the software engineer 

who routinely develops Eprom-based applications. It will emulate a ii 

and/or program any of the currently available five-volt only MOS : 

Eproms from the 2758 at the low end to the 27128 at the high end. 64K STATIC RAM Board is only $395! 

The primary features are: Compatible with Proposed IEEE 696 standard 
Compatible with IEEE 696 S-100 standard Totai RAM/EPROM interchange capability (R/W jumpered) 
1/0 mapped—consumes no system RAM space Extended Address capability (A16-A23) 
16K bytes of on-board emulation RAM Global Addressing possible in 16K groups 
Zero insertion force programming socket Global/Extended allocations are 16K per group 
Complete with software: @ runs under CP/M*, MP/M*, or _ 0-8 wait states for EPROM with fast CPU’s 
arc] gmuleion init Gaba es TuNGION a6 PROVR Petals see OOH By Le EAU 
@ supplied in source code on 8” single sided soft-sectored disk. taeilcetaccial oncboart Pane 2 
Incorporates the Intel fast programming Algorithm © Automatic deselect of empty sockets via FF detector 


NO personality modules necessary All boards are assembled, tested, burnt in and supplied with 


Hardware provisions have been incorporated to allow Paet 
programming of future 32K Eproms 150 nsec CMOS RAMS plus a 1 year limited warranty and 


wner’s manual. 
The board may be purchased with a zif socket mounted on the baal oe MASTERCARD VISA 


board, or with a flat cable socket to connect to an external module. 
Board with zif socket $305.00 IMLAAI € 7 | 
Board with flat cable socket 295.00 
External module + 4’ cable 55.00 Manufacturing and Test Company, Inc. 
427 Perrymont, San Jose,CA 95125 (408) 998-1655 


*CP/M and MP/M are trademarks of Digital Research Inc. **CDOSis a trademark of Cromemco, Inc. 
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A General-Purpose Graphic 
Plotting Package 


Part 3: JRT Pascal and Pascal/Z listings 
by David H. Freese, Jr. 


he techniques for interfacing high-level the interpreter into passing multiple parameters. 
languages to dot-matrix printers via ma- I have received many letters of appreciation 
chine-code drivers was described in Parts prompted by Part 1 of this series of articles, and I 
1 and 2. The use of machine code drivers would like to thank those who took the time to write. 
provides a common linkage to the printer’s I hope this article will allow you to use your graphics 
graphic capability for several different high-level lan- printer to its fullest potential. 
guages. The extension of the drivers to include auto- I have also developed a nearly identical set of func- 
matic scaling and translation was demonstrated for tion subroutines for interfacing to the HIPLOT DP-2 
Basic programming techniques in Part 2. digital plotter. These also include alphanumeric let- 
Part 3 presents the same programs written in both tering subroutines. Driving the DP-2 from Basic can 
JRT Pascal and Pascal/Z. While not presented in be laboriously slow. These drivers allow the DP-2 to 
this article, I would like to add that I have also linked become a real racing machine. 
the machine-code drivers to Microsoft’s Fortran-80 - 


compiler and Digital Research’s PL/I-80 compiler. Dave Freese is an electrical engineer, presently 
In conclusion, it should be noted that Digital Re- employed as a senior engineering analyst by San- 
search, Microsoft, Ithaca Intersystems, and JRT Inc. ders & Thomas, Inc. He is the owner of Clermont 
all provide well-documented information for parame- Computer Consultants, a small company special- 
ter passing to external machine code subroutines. izing in real-time control applications. He holds a 
The Basic interpreters are the most difficult to work B.S. and M.S. in electrical engineering. Dave re- 
with, since care must be taken in moving the external cently retired from a 20-year career in the U.S. 
subroutines to a protected area in memory. In addi- Coast Guard, where his duties included an assign- 


tion, some special techniques must be used to force ment as head of the electrical engineering depart- 
MoMigt tS See ies ae Dae ate ment at the Coast Guard Academy. He was also 
David H. Freese, Jr., Clermont Computer Consul- chief project engineer at the Coast Guard’s elec- 


tants, R.D. 1, Box 316, Cape May Court House, NJ tronics engineering center in Wildwood, NJ. 
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o5) 
integer); extern; 


08210 


The array size is given by: 
(* image MUST be first var declared *) 


real end; 
real end; 
extern; 


: real; extern; 
: real; extern; 
real; 
real; extern; 
real; extern; 
integer); 


real): 
real): real; extern; 


Freese Jr. 
Clermont Computer Consultants 


RD 1 Box 316 
263 7511 


integer; 


char; 
char; pl,p2,p3,p4,p5,p6,p7 


array [1..21476]) of char; 


record r,i: 
record d,a: 
complex; 
real; 

real; 

real; 

real; 


i,j,k,npts,n,ndec, 
xlplt,ylplt, 


x2plt,y2plt : 


ans 


NLINES * 7 * trunc(NLINES*7/8 + 
plt; 


JRT PASCAL 
20 February 1983 
Cape May Court House, NJ 


D. HH. 
(609) 
400.0; 
real) 
real) 
real): 
real): 
clear screen; 


JRT Pascal Bode Plotting Program ~ 


N 
jplot(cmd: 
clear line; 
screen(line,column: 


cos(x: 
arctan(x: 
1n( x: 
exp(x: 
sqrt(x: 


type plt defines the size of the plotting image in memory 
sin(x: 


it is determined by the NLINES equate in the assembly code 


Example program showing use of graphics plotting package 
for the plotting package. 


Version: 

Programmer: 

fourhd 

complex 

polr 

image 

s,t 

fF flsce 

delf, 

fscale 

decibels : 

dbmax ,dbmin, 

dec0,deldec, 

dbscale,dbaxis, 

dbo 
write(chr(27),'Y',chr(32+line) ,chr(32+column) ) 


write(chr(27),'K') 


write(chr(27),'E') 
end; 


end; 


(* 
(* COMPLEX NUMBER FUNCTION/PROCEDURES *) 


program bode; 
procedure 


procedure 
begin 


begin 
procedure 


const 
type 
procedure 
function 
function 
function 
function 
function 
function 
begin 


*) 


112 Microsystems August 1983 


ert 


(* sum of two complex numbers *) 
function csum(cl,c2: complex): complex; 
begin 

csaum.r 2=@ clor + c2.rs 

csum.i := cl.i + c2.i 
end; 


(* difference of two complex numbers *) 
function cdiff(cl,c2: complex): complex; 
begin 

ediii.c t= clin — c2.63 

calftf.i) s= clit = c2ci 
end; 


(* product of two complex numbers *) 
function cprod(cl,c2: complex): complex; 


begin 
cprod.r t* cl..r*c2.0 = cl.i*c2.i5 
cprod.i s= clortc2.i + clsi*c2-r 
end; 


(* complex number multiplied by its complex conjugate *) 
function cmag2(c: complex): real; 
begin 
emag2 :* c.r*c.r + c.i*c.i 
end; 


(* magnitude of a complex number *) 
function cmag(c: complex): real; 
begin 

cmag := sqrt (cmag2(c)) 
end; 


(* quotient of two complex numbers *) 
function ediv(cl,c2: complex): complex; 
var den : real; 
begin * 

den := cmag2(c2); 

if den < 1.0e-20 

then den := 1.0e-20; 


ediv.r := (cl.r*c2.r + cl.i*c2.i)/den; 
ediv.i := (cl.r*cl.i - cl.r*c2.i)/den 
end; 


(* angle associated with polar representation of a complex number *) 


function cang(c: complex): real; 
const pi = 3.141592654; 

hpi = 1.570796327; 

tpi = 6.283185308; 

zero = 0.0; 


var ang : real; 
begin 
if c.i = zero 


then ang := hpi 
else ang := arctan(c.r/c.i); 
if (c.r >= zero) and (ang < zero) 
then ang := tpi + ang; 
if (c.r < zero) 
then ang := pi + ang; 
cang := ang 
end; 
(* polar to rectangular conversion of a complex number *) 
function rect(p: polr): complex; 


begin 
rect.r := p.d*cos(p.a); 
rect.i := p.d*sin(p.a) 
end; 


(* rectangular to polar conversion of a complex number *) 
function polar(c: complex): polr; 


begin 
polar.d := cmag(c); 
polar.a := cang(c) 
end; 


(* logarithm, base 10 of » real number *) 
function log(v: real): real; 
const k = 2.3025851; 
begin 
log := In(v)/k 
end; 


(* real number converted to decibels *) 
function db(v: real): real; 
const k = 20.0; 
begin 
db := k*log(v) 
end; 


(* real number raised to a real power *) 
function pwr(a,b: real): real; 


Pwr := exp(b*1n(a)) 


(* Transfer is the function representing the input/output 
relationship described in LaPlace Transform notation. 
The variable 's' represents the complex frequency: a + 
The Transform is evaluated only on the jw axis, so ‘a' 
always zero. ‘w' is equal to 2*pi*f, where f is frequency 


in Hertz. 
a] 
function transfer(s: complex): complex; 
var al,a2,a3,a4 : complex; 


begin 
al.r := 1.0; ali 
a2.c := 2.03 a2.i 
a3eG 2= 0.02; a3.i 
a4 := cprod(s,s); 


a4 := csum(a4,a2) 

a4 := csum(a4,cprod(s,a3)); 

transfer := cdiv(csum(s,al) ,a4) 
(* 

transfer = (s + 1)/(s*s + .02*s + 2) 

*) 
end; 
begin (* bode *) 


repeat 


clear screen; 


writeIn(' BODE DIAGRAM TEST PROGRAM'); 


writeln; writeln; 

write('# of decades in frequency ..... i 
write('# of points/decade in plot .... ' 
write('minimum frequency to plot ..... ' 
write('maximum decibel value ......... ' 
write('minimum decibel value ......... LF) 


deco := log(fl); 
deldec := ndec/npts; 
dbscale := fourhd/(dbmax - dbmin); 
fscale := fourhd/ndec; 
writeln; writeln('Initializing plot image.'); 
jplot('i', 0, 0, 0, 0, 0, 0, 0); 
writeln; writeln('Drawing axis.'); 
jplot('a', 0, trunc(dbscale*(dbaxis - dbmin)), 
0, Oo, 
0, trunc(dbscale*20.0), 
0); 
writeln; writeln('Placing logarithmic grid.'); 
for i := 0 to ndec - 1 do 
begin 
for j := 2 to 10 do 
begin 
k := trunc((i + log(j))*fscale); 
Jplot(* 1 ky 400, k; 05: 0; (0; Odi- 
end; 
end; 


3; read(ndec); 
); read(n); 
); read(fl); 
); read(dbmax); 

; vead(dbmin); 
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r(ten, decO); 
0.0; s.i := tpi*f; 
db(cmag (transfer(s))); 


= round(fscale*(log(f) - decO)); 
:= round(dbscale* (dbO - dbmin)); 


clear screen; 
writeIn('Bode Computations"); 


for i := 0 to npts do 


begin 

f := pwr(ten, i*deldec + decO); 

Sor :@ 0.0; s.i := tpit*f; 

t := transfer(s); 

decibels := db(cmag(t)); 

screen(20,0); clear line; 

write('Freq: ',£:8:2,' dB: ',decibels:8:2); 
x2plt := round(fscale*i*deldec) ; 

y2plt := round(dbscale*(decibels - dbmin) ); 
jplot(‘l', xlplt, ylplt, x2plt, y2plt, 0, 0, 0); 
jplot('d*, x2plt, y2plt, 0, 0, 0, 0, 0); 
xlplt := x2plt; 

ylplt := y2plt; 

end; 


jplot('t', 0, 0, 0, 0, 0, 0, 0); 


screen(23,0); clear line; 
write('To repeat the program enter "“y"... '); 
read(ans); 


until not (ans in [‘y','Y‘']); 


end. 


(* 


*) 


Pascal/Z Bode Plotting Program 


BODE 

Example program showing use of graphics plotting package 
Version: PASCAL/Z 

Date: 20 February 1983 


Programmer: 
D. H. Freese Jr. 
Clermont Computer Consultants 
RD 1 Box 316 
Cape May Court House, NJ 08210 
(609) 263 7511 


program bode; 


const fourhd = 400.0; 


ten = 10.0; 
tpi = 6.283185; 


complex = record r,i: real end; 
polr record d,a: real end; 


eit complex; 
£,£1,£2 : real; 
delf, 

fscale : real; 
decibels : real; 
dbmax ,dbmin, 
dec0O,deldec, 
dbscale,dbaxis, 
dbo : real; 
i,j,k,npts,n,ndec, 
xlplt,ylplt, 


x2plt,y2plt : integer; 
ans : char; 


(* EXTERNAL PROCEDURES contained in file PASPLOT.REL *) 


procedure axis(x0,y0,xa,ya,xb,yb: integer; grid: boolean); external; 


procedure line(xl,yl,x2,y2: integer); external; 
procedure plot(xl,yl: integer); external; 
procedure point(xl,yl: integer); external; 
procedure circle(xl,yl,radius: integer); external; 
procedure init; external; 

procedure xfrplt; external; 


(* H89 SCREEN HANDLING PROCEDURES *) 


procedure clear screen; 
begin a 

write(chr(27),'E') 
end; 


procedure clear line; 
begin = 
write(chr(27),'K') 
end; 
procedure screen(line,column: integer); 
begin 
write(chr(27),'Y',chr(32+line) ,chr(32+column) ) 
end; 


(* COMPLEX NUMBER FUNCTION/PROCEDURES *) 


(* sum of two complex numbers *) 
function csum(cl,c2: complex): complex; 
begin 
csum.r 3= clr + c2.4r3 
esum.i := cl.i + c2.i 
end; 


(* difference of two complex numbers *) 
function ediff(cl,c2: complex): complex; 
begin 

calff.r 2= cher - c2ers 

cdif£E.S 2= cl.i =< ¢2.1 
end; 


(* product of two complex numbers *) 
function cprod(cl,c2: complex): complex; 
begin 
cprod.r 
cprod.i 
end; 


= ¢l.c%c2.£°= cl.i*c2.ij 
# clsr*c2.i-+ cl.i*c2ir 


(* complex number multiplied by its complex conjugate *) 
function cmag2(c: complex): real; 
begin 
cmag2 <= c.r*c.r + c.i*c.i 
end; 


(* magnitude of a complex number *) 
function emag(c: complex): real; 
begin 

cmag := sqrt(cmag2(c)) 
end; 


(* quotient of two complex numbers *) 
function cdiv(cl,c2: complex): complex; 
var den : real; 
begin 

den := cmag2(c2); 

if den < 1.0e-20 

then den := 1.0e-20; 

cdiv.er := (cl.or*c2.r + cl.i*c2.1)/den; 
end; 
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(* angle associated with polar representation of a complex number *) 


function cang(c: complex): real; 
const pi = 3.141592654; 


hpi 1.570796327; 
tpi 6. 283185308; 
zero = 0.0; 


var ang : real; 
begin 


if c.i = zero 
then ang := hpi 
else ang := arctan(c.r/c.i); 
if (c.r >= zero) and (ang < zero) 
then ang := tpi + ang; 
if (c.r < zero) 
then ang := pi + ang; 
cang := ang 


end; 


(* polar to rectangular conversion of a complex number *) 
function rect(p: polr): complex; 
begin 


rect.r := p.d*cos(p.a); 
rect.i := p.d*sin(p.a) 


end; 


(* rectangular to, polar conversion of a complex number *) 
function polar(c: complex): polr; 
begin 


polar.d := cmag(c); 
polar.a := cang(c) 


end; 


(* logarithm, base 10 of a real number *) 
function log(v: real): real; 

const k = 2.3025851; 

begin 


log := 1n(v)/k 


end; 


(* real number converted to decibels *) 
function db(v: real): real; 

const k = 20.0; 

begin 


db := k*log(v) 


end; 


(* real number raised to a real power *) 
function pwr(a,b: real): real; 
begin 


Pwr := exp(b*1n(a)) 


end; 


(* Transfer is the function representing the input/output 


*) 


relationship described in LaPlace Transform notation. 

The variable 's' represents the complex frequency: a + jw. 
The Transform is evaluated only on the jw axis, so 'a' is 

always zero. '‘w' is equal to 2*pi*f, where f is frequency 
in Hertz. 


function transfer(s: complex): complex; 
var al,a2,a3,a4 : complex; 


1.0; al.i 
2.03 a2.i 
0.02; a3.i 
cprod(s,s); 
csum(a4,a2); 
:= csum(a4,cprod(s,a3)); 
transfer := cdiv(csum(s,al) ,a4) 


transfer = (s + 1)/(s*s + .02*s + 2) 


begin (* bode *) 


repeat 
clear screen; 


writeln(' BODE DIAGRAM TEST PROGRAM'); 


writeln; writeln; 

write('# of decades in frequency ..... réad(ndec); 
write('# of points/decade in plot .... ; read(n); npts 
write('minimum frequency to plot ..... read(f1); 
write('maximum decibel value .........- read (dbmax); 
write('minimum decibel value ......... ; read(dbmin); 


decO := log(fl); 

deldec ndec/npts; 

dbscale fourhd/(dbmax - dbmin); 
fscale := fourhd/ndec; 


writeln; writeln('Initializing plot image.'); 
init; ‘ 
writeln; writeln('Drawing axis.'); 
axis(0, trunc(dbscale*(dbaxis - dbmin)), 
0, 0, 
0, trunc(dbscale*20.0), 
false); 
writeln; writeln('Placing logarithmic grid.'); 
for i := 0 to ndec - 1 do 
begin 
for j := 2 to 10 do 
begin 
k := trunc((i + log(j))*fscale); 
line(k, 400, k, 0); 
end; 
end; 


:= pwr(ten, decO); 
:= 0.0; s.i := tpi*f; 
:= db(cmag-(transfer(s))); 


round(fscale*(log(f) - dec0O)); 
round(dbscale*(db0 - dbmin)); 


clear screen; 
writeIn('Bode Computations’); 


for i := 0 to npts do 
begin 
f := pwr(ten, i*deldec + dec0O); 
S.r := 0.0; s.i := tpi*f; 
t := transfer(s); 
decibels := db(cmag(t)); 
screen(20,0); clear line; 
write('Freq: ',f£:8:2,' GB: ',decibels:8:2)- 
x2plt := round(fscale*i*deldec); 
y2plt := round(dbscale*(decibels - dbmin))j; 
line(xlplt, ylplt, x2plt, y2plt); 
point(x2plt, y2plt); 
xlplt := x2plt; 
ylplt := y2plt; 
end; 


xfrplt; 
screen(23,0); clear line; 


write('To repeat the program enter "y"... '); 
read(ans); 


until not (ans in ['y',"Y']); 


end. JRT Pascal Bullseye Test Plotting Program 


(¥ PLOT TEST PROGRAM 


stl 


Program plots a bullseye test pattern on the graphics 
printer. Designed to demonstrate the calling sequence 
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to the graphics plotting package. 


Graphic Plotting Package continued... 


extern; 


integer); 


1); 


increasing radius *) 


of char 


of pline; 


P1,p2,Pp3,p4,P5,Pp6,p7 
in memory *) 
25, 


200,200, 
25, 


intervals of 25 
5, 


image 
intervals of 5 


Freese Jr. 
Clic4134 


H. 
array 
array [1..52] 
: char; 
5, 
H. Freese Jr. 
263 7511 


Clermont Computer Consultants 


RD 1 Box 316 


JRT PASCAL 


_Designed to demonstrate the calling sequence 


Cape May Court House, NJ 08210 
to the graphics plotting package. 


Clermont Computer Consultants 
(609) 263 7511 


20 February 1983 
RD 1 Box 316 
200, 

PASCAL/Z 

(609) 


D. 
Cape May Court House, NJ 08210 


20 February 1983 


D. 


image to the printer *) 


integer 
jplot('T',0,0,0,0,0,0,0); 


390,390,0, 


Version 
Programmer 
pline 
plt 

200, 
1 to 8 do 


Date 
Program plots a bullseye test pattern on the graphics 


Pascal/Z Bullseye Test Plotting Program 


superimpose a grid *) 
PLOT TEST PROGRAM 


minor ticks at 

Major ticks at 
jplot('A', 

printer. 

Programmer 


Version 


(* plot a crossed pair of lines *) 
transfer 


(* plot axis centered at 
jplot("L', 


(* initialize the plot 
jplot('I',0,0,0,0,0,0,0); 


type 
(* 


*) 


program JPLTST; 
(* plot data point marks at ends of lines *) 


jplot{'D', 
(* plot 8 concentric circles of 


procedure jplot(func 


program ZPLTST; 


jplot('D', 
jplot('pD', 
JoLORE DS; 
end. 

=) 


One of the finest implementations of the FORTH language. 
Field tested and reliable, UNIFORTH is available for the IBM 
PC as well as most systems with 8” disks and the following 
processors: 

8080 PDP-11 

Z80 68000 

8086/8 16032 


que CAST MEMORY 


As a task, UNIFORTH is compatible with and supports all 
features and file types of the CP/M, CDOS, MS-DOS and DEC 
operating systems. As an operating system, UNIFORTH will 
function “stand-alone” on most commercial microcomputers, 


The FORTH-79 Standard language has been extended with 
over 500 new words that provide full-screen and line-oriented 
editors, array and string handling, enhanced disk and terminal 
1/O, and an excellent assembler, Detailed reference manuals 
supply complete documentation for programming and system 
operation, in an easy-to-understand, conversational style using 


numerous examples, f : 
THE LAST MEMORY” is a high performance 64K memory module for 8 bit S100 systems. This board uses 16K 


;. . - byte wide static RAM’s which eliminate the timing and reliability problems associated with dynamic RAM boards. 
Optional features include an excellent floating-point package The 2K by ectute of these RAM sallow high density and low power consumption, characteristic not found in 
} most static memories. This architecture also allows the use of 2716 type E! 's in place of ’s with no 
with all transcendental functions (logs, tangents, etc.), the modification. As a result, this one board provides total system memory. THE LAST MEMORY" is available 


MetaFORTH cross-compiler, printer plotting and CP/M file starting at less than $100.00 
transfer utilities, astronomical and amateur radio applica- 


tions, word processing, etc. |G MEMORY” is a combination EEPROM (Electrically Eraseable PROM) EPROM/RAM memory module 
s. This b includes an onboard EEPROM programr 
ormal memory write instructions - no special softwar 
a time need to start over to make hanges. Pr 
socket - EEPROM's can be ang them, EEPROM's, 
wide static RAM's may be 


Compare these features with any other FORTH on the market: 


ng may be performed in any 
EPROM's, or 16K byte 
{ memory. LASTING 


ated in any of the 16 ckets for a total of 321 


@ Speed and efficiency @ Ease of use MEMORY” is available at $299 
@ Variety of options ® Documentation quality 
You'll find UNIFORTH is superior. Static memory systems inc. MC VISA accepted 
#1 State Bonk Center All prices net, FOB Freeport, IL 
Prices start at $35. Call or write for our free brochure. Freeport, €. 60002 ote) 596-8713 EH dicount avaiable 


9AM. to4 PM. Mon. - Fr Dealer inquiries invited, 


Unified Software Systems 
P.O. Box 2644, New Carrollton, MD 20784, (301) 552-1295 
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integer 


Graphic Plotting Package 
continued . . . 
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Linked at Last! 


MSPRO™unites MS-DOS* 


and CompuPro’. 


Now, lovers of CompuPro® hardware can 
be users of most IBM software. The MSPRO™ 
subsystem turns a clash of titans into a league 
of nations, by making the world of MS-DOS® 
based software available to CompuPro® users 
for the first time. 

MSPRO™ supports your existing 8-inch 
drives and up to four 5-1/4 inch drives for 
transferring files. Includes one 5-1/4 inch disk 
drive in enclosure with power supply ($325 
single sided 48 tpi, $395 double sided 48 tpi), 
disk controller board ($350), MSPRO™ operat- 
ing system diskette ($395, with cables and 
manual). Dealer inquiries invited. 


MS-DOS is a registered trademark of Digital Research Inc 
CompuPro is a registered trademark of Godbout Electronics Inc 
MSPRO is a trademark of Computer House Inc 


- as 


See how the other half computes. 
Order MSPRO™ today, from Computer 
House (a Full Service CompuPro System 
Center), 722 Vie St., San Rafael, CA 95901. 
Call (415) 453-0865 for further details. 
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Workman & Associates 


112 Marion Avenue, Suite 2B 
Pasadena, CA 91106 
(213) 796-4401 


The File Transporter 


If you own more than one machine, you. know how 
difficult it is to move files between them. One 

copy of The File Transporter will move any file 
between CP/M machines. It’ll even send to CP/M- 
86 machines! Requires matching ports (serial or 
some parallel) or modems. A very detailed manual 
is included. The File Transporter is $69.50. 


BDS’s C Compiler 


Leor Zolman’s BDS C compiler -- generates compact 8080 
code FAST! Comes with a 200-page manual and example 
programs. Other disks of useful C programs will be 
available soon. $130.00 from W & A 


Symbol 


Symbol allows easy construction and review of 
abbreviations for CP/M command line strings. 
Such commonly used strings as "PIP B:=G:*.*[v]" 
can become "PA.COM". Symbol is $24.50 


et ee OO Oe Oe 
Disk formats include: 8", Apple CP/M, Osborne, Xerox, 
KayPro, Monroe, and Otrona. Please request our catalog. 
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SUPER-FAST! 
280 


Relocating Macro 


ASSEMBLER 
$169.95 


Directly generates COM, HEX, or REL files. 
Flexible REL format allows external bytes and 
words with complete math operations on them 
(Microsoft format optional). Features Zilog 
mnemonics with nested macros, conditionals 
and include files. Unique one-pass design 
generates compact intermediate code which is 
then processed to resolve forward references, 
yielding tremendous time savings. Complete 
listing, symbol table and cross-reference output 
may be sent to any device. The perfect tool for 
assembly language programming. Linker in- 
cluded. Manual only — $30. For Z80 CP/M and 
TRS-80. 


1622 NORTH MAIN ST. © BUTLER, PA 16001 © (412) 282-0864 
Shipping $3 U.S., others $7. PA + 6%. Check, MO, VISA, M/C, C.O.D. 


Most formats available. Dealer and OEM inquiries invited. 
Z80, CP/M, TRS-80 TM's of Zilog, Digital Research, Tandy Corp. 
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The following modification to TPM will allow the 
user to change the command character for ZAPPLE 


to any character he or she chooses. Control-X will 
®Handles all IEEE-488 1975/78 functions 
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This is usually no problem unless you want to use 


WordStar. The Control 
TPM and not passed to WordStar. 


then be passed to WordStar 


no problems. 
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Design Labs, as implemented for the TDL/ 
ZITAN SMB using ZAPPLE, traps the 


character Control-X for use as a command 
to execute the ZAPPLE ROM monitor. 


he TP/M operating system by Computer 


Peter V. Radatti, 210 West 12th Ave., Conshohock- 


en, PA 19428 
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agazine! 


W..... you already own an IBM Personal Computer 
or you're thinking about buying one, you need PC 
Magazine. 


PC Magazine is the independent guide to IBM Per- 
sonal Computers. Each monthly issue is packed with 
the latest information for everyone who's interested 
in IBM Personal Computers. 


This is the magazine for finding out how to put 
together the best IBM “PC” system...and how to 
get the most out of it. Every month you'll receive 
hundreds of colorful pages of evaluations, in- 
sights, and straight talk from respected ex- 
perts— professionals in computer science as 
well as lawyers, businessmen, writers, ed- 
ucators and many others. 


PC covers software, hardware, applica- 
tions, and every other topic of impor- 
tance to the thousands of IBM Personal 
Computer users who read it. To make 
sure that we give you the facts you 
need, we include a special ‘‘User- 
to-User”’ section, a ‘PC Wish List’ 

and news about IBM Personal 
Computer clubs, events 
and publications, 


| | PC’ Magazine — 


Right now you can save up H 
P.O. Box 598, Morris Plains, NJ 07950 


to 31% on an introductory 
subscription. And if you're 
ever dissatisfied with PC, 
just write and tell us—you'll 
receive a prompt refund for 
all the unmailed issues re- 
maining in your subscrip- 
tion, 


Yes! I want to subscribe to PC; the independent guide 
to IBM Personal Computers: 

[] One year (12 issues) only $21.97— 19% off! 

[_] Two years only $40.97—24% off! 

{_] Three years only $55.97—31% off! 

Savings based on full one-year subscription rate of $26.97 


CHECK ONE: [] Paymentenclosed. [] Bill me later. 8H286 
Mr./Mrs./Ms. 


(please print full name) 


Company. 


Address 
City Sate 0 


Offer valid only in the U.S., its territories and possessions. Please allow 30 to 60 days for delivery of first issue. 
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The 50-line Text Formatter 
Gets Running Fast 


A quick substitute for a text processor, 
this minimal formatter can be used 
for letters and short papers 
by lan F. Darwin 


ou’ve just sent away for an expensive 

word processing package that is oozing 

its way through the mail system some- 

where, and you’ve just got to get these 

letters and manuscripts out now. You 
don’t want to spend hours writing a text formatter 
because you’ve just spent a bundle on what you hope 
will turn out to be a good text processor. For now, all 
you have is a partial-screen user-hostile editor—and 
a C compiler. Where do you go from here? 

When faced with this dilemma recently, I came up 
with the 50-Line Text Formatter for my CP/M sys- 
tem. Also called the Barebones Formatter of Text (or 
BFT for short), the formatter has one special charac- 
ter, no commands, no options, no parameters, and 
was written and debugged in about an hour. It does 
ragged-right alignment of text and provides for line 
breaks. Surprisingly, these two features provide an 
acceptable bare minimum for doing letters and short 
papers! 


The programming language 
BFT was developed using the C/80 dialect of C, from 
the Software Toolworks, with the addition of one 
‘standard I/O’ library routine patterned after the 
UNIX ‘stdio.h’ library. The routine I added, ‘is 
space’, returns ‘true’ if or when the single character 
passed to it is a space, a tab, a newline or a formfeed. 
I also defined ‘FILE”’ for compatibility. 

It is perfectly common in C to use the fact that one 
can test an assignment in the same statement as the 
assignment itself. The construct 


if ((x=y)==5) ... 


both copies the current value of y onto the memory 
location called x, and tests whether the value so as- 
signed is equal to 5. The main program, for example, 
need only consist of ‘while ((ic=getchar())!= EOF’ 
and a compound statement which is executed as a 
result. This says: “assign to ‘ic’ the result of function 
‘getchar()’; as long as the assignment value is not 
EOF, then perform the statement part (from ‘if 
((c==‘\n’) . . : ’ to ‘outchar (c);’) and repeat the 
test’’. This provides a concise way of processing a file 
a character at a time, and is almost an ‘idiom’ in the 
C. language. 

Also; the notation ‘\n’ deserves attention. This 
represents a single character, the “newline’. In 
UNIX and UCSD this is.a. single character; on 
CP/M, the newline consists of two characters, a car- 
riage return and a line feed (CR-LF). C implementa- 


tions on CP/M systems normally map CR-LF to ‘\n’ 


Ian F. Darwin, Computing Services, Univ. of 
Toronto; Toronto, Ontario, M5S 1A1 Canada 
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on input, and vice versa on output. Similarly, ‘\t’ is a 
single character, the tab. C provides a series of these 
representations for hard-to-get characters, and they 
can be used in constructs such as ‘switch’ statements 
(unlike Pascal’s CASE statement, in which one must 
code the numerical equivalents or a _ defined 
CONSTant). This makes it easier to write systems 
programs and text formatters in C. 


The program 

Consisting of about 50 lines of code in the C pro- 
gramming language, BFT has a main program and 
two short functions (see listing). The main routine 
looks at each character in the text. If the escape char- 
acter is seen (defined by BREAKCHAR, and only 
changeable by recompiling the program), then a new 
line is started and the column counter is reset to zero. 
Otherwise, if the character is a newline (‘\n’) or a tab 
(‘\t’), we change it to a space. Newlines are normally 
eaten to make the input stream look like a single long 
line, which BFT has to break up into lines of a rea- 
sonable length. Tabs become blanks just because it’s 
simpler than working out the spacing—after all, this 
is a barebones text formatter! If you want to add tab 
handling, there’s a good discussion in the Software 
Tools books by Kernighan and Plauger. 

The main routine inserts a newline at the first 
word boundary after column MINCOL has been 
reached, or when a user-provided break character is 
found in the input. There is no provision for breaking 
long words via hyphenation. My text doesn’t use 
many very long words. With German or Turkish, 
which tend to use longer and still longer words, BFT 
would have serious problems. 

Whenever the main program needs a line break, it 
just calls the routine ‘1 break’, which prints a newline 
(‘\n’). After printing the newline, ‘1break’ sets the 
current column indicator to zero, which is the left 
margin. 

Normal characters are printed by calling ‘out- 
char’, which passes the character to ‘putchar’, the 
C library routine for output. ‘Outchar’ also incre- 
ments the column counter. 

There is thus no true justification of line—the out- 
put is ‘ragged right’ and, except for the problem of 
very long words, appears very much as a decent typist 
might produce it. 


Usage 
Prepare the input text using any program which will 
put what you type into a file. I used CP/M’s ED for 
this manuscript, not because it’s my favorite editor 
(believe me, it’s not!), but because it was there. 
Insert a ‘break character’ wherever you want a 
new line to start; one for a new line, two for a new 
paragraph. For example, if you compiled BFT with 


50-line Text Formatter continued . 


BREAKCHAR defined as ‘$’, then you would enter 
the following: 


produce it. 
$$Usage 


$Prepare the input text... 


to produce the end of the preceding paragraph and 
the start of this one. An alternate form would be 


produce it. 


$$ 


Usage 


$$ 


Prepare the input text... 
You could even enter it as 
produce it.S$S$UsageS$Prepare 


the input text... 
but the former versions produce a manuscript that is 
easier to update for later revisions. It’s a good general 
rule with any separate text formatter to begin each 
new sentence on a new line. 

BFT is quite easy to use. You just say 


A>bft infile 


This 50-line Text Formatter can be operational in 5 to 10 minutes on 
most any C compiler. A few minutes is all it takes to learn, since 
there’s only one special character, and almost any editor can be used 


to prepare the input. 


c= 


(column>MINCOL) ) { 


SE £idieX\n"),: 
(c=="\t")) 


1! 


if (isspace(c) &§& 


fopen(argv[1],"r") ) ==NULL) f 


ot 
outchar(c); 


lbreak(); 
} 


printf("can't open $s\n",argvll1]); 


exit(l); 


} 


printf ("usage 
while ((c=getc(infile))!=EQF) { 


exit(1); 
if ((c=="\n"') 


column; 
infile; 
(argc!=2) f 
((infile 


main(argc,argv) 
char *argv[]1;{ 


/* bft -- barebones formatter of text */ 
cnar C,di: 


#Hinclude <stdio.h> 
#define BREAKCHAR 
#define MINCOL 57 


int 
def 


. 
‘ 


lbreak() 


(c==BREAKCHAR) 


aos 
else outchar ( 


} 


else 
outchar('\n"'); 


to get a listing on the terminal, or something like 
A>bft infile >lst: 


to get a printout. To get a listing in a file on disk, you 
just type 


A>bft infile >outfile 


These examples assume that you are using a ver- 
sion of C (such as C/80) which allows redirection of 
the output. In fact, the program could be made sim- 
pler by eliminating the code to open the input file, 
and just redirect the ‘standard input’ from a file. The 
above examples would become 


A>bft <infile 


and you would shave another half-dozen lines from 
the code. 


Conclusion 

This program provides a usable, albeit nearly trivial, 
working text formatter. It has problems with long 
words at the end of lines, but fortunately this doesn’t 
happen very often. For a few hours’ worth of work, 
however, it did the trick until my expensive formatter 
arrived. I did get those letters out on time. And the 
price was right. 


/* do nothing */; 


(column==6) ) 


Cc); 

; 
putchar(s); 
column+t; 


outchar('\n™) 
column=0; 


outchar(s) 


lbreak() { 
char s;f{ 


Program name: SOFTPLOT/ 
BGL 
Hardware system: CP/M or 
MS-DOS system with dot ma- 
trix printer, plotter, or graphics 
display 
Minimum memory size: 12K 
Basic workspace, 48K TPA 
Language: CP/M or MS-DOS 
Microsoft Basic interpreter or 
compiler 
Description: SOFTPLOT/BGL 
(Basic Graphics Language) is a 
device-independent graphics ex- 
tension system that supports 
Microsoft Basic and can make 
use of dot matrix printers for 
high-resolution graphics, as 
well as plotters and displays. 
Its minimal hardware and soft- 
ware requirements can signifi- 
cantly reduce the cost of pro- 
ducing and using graphics ap- 
plications, since even the sim- 
plest Basic program can easily 
support a wide variety of hard- 
ware configurations. A prepro- 
cessor and mergeable subrou- 
tines are used to permit pro- 
gramming in high-level HP and 
Tektronix-like commands such 
as PLOT X,Y. It supports 
viewport, window, rotation, text 
justification, color, dashing, 
and 3D perspective. Full use is 
made of available device fea- 
tures. 

When released: June 1983 

Price: $200 

Included with price: Tutorial 
manual, EMUPLOT printer 
dump module, pre- and de-pro- 
cessor, library and driver sub- 
routines for various displays, 
plotters, and printers. A dem- 
onstration program is also sup- 
plied. 
Available from: 

Graphic Software, Inc. 

1972 Mass. Ave. 

Cambridge, MA 02140 

(617) 491-2434 
CIRCLE #117 ON READER 
SERVICE CARD 


Hardware system: Any CP/M 
system 

Minimum memory size: 64K 
Language: Object code 
Description: An interactive, 
menu-driven processor using 
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Program name: FILEBASE® 


Software Directory 


comma-delimited field records. 
Options include record selec- 
tion, merging, sorting, creating 
new files, appending to existing 
files, rearranging fields or add- 
ing new ones. 

Sorts even on last name if 
embedded in a full-name field; 
sorts on zip code even if part of 
a “city, state, zip”’ field. 

Records can be selected or 
excluded by testing field con- 
tents with comparators (GT LT 
EQ GE LE BT), or against up 
to 300 user-entered values. 
Other methods include a range 
of record numbers or list of up 
to 1000 different record num- 
bers, or by viewing each record 
to include/exclude by a key- 
stroke. 

FILEBASE can print labels 
or envelopes and line listings to 
screen or printer. Fields can be 
printed under each other with 
or without record and field 
numbers. Keyboarded com- 
ments can be added to each 
record when printing. Files can 
be combined into one new file 
or divided into two, using sort 
and select/exclude methods. 
Variable-length records can be 
converted to fixed length, and 
CB80/CBasic-type fixed-length 
records can be converted to 
variable length. 

The user does not need to 
know the number of fields or 
their sequence in the record be- 
cause the program determines 
and displays the data. 
When released: April 1983 
Price: $75 
Included with price: 8’’disk or 
various 5%’’ formats and 70- 
page manual. 
Available from: 

EWDP Software, Inc. 


P. O. Box 40283 
Indianapolis, IN 46240 


(317) 872-8799 
CIRCLE #115 ON READER 
SERVICE CARD 


Program name: Mailer 
Hardware system: 8080/Z80, 
CP/M, CRT with addressable 
cursor, reverse video, and half- 
intensity. 
Minimum memory size: 64K 
Language: Object code (Source 
PL/I 80) 
Description: A complete menu- 
driven mailing list management 
program with sort (name or 
zip) and merge features in- 
cluded. A screen form speeds 
and simplifies data entry, 
checking, correction and updat- 
ing. The program is “friendly” 
and “forgiving” and requires no 
programming knowledge. The 
data fields are reference cate- 
gory, first name, last name, 
prefix, 3 address lines, city, 
state, zip (5 or 9 digits) and 
telephone. Labels are formatted 
to print 1, 2, or 3 across. Rec- 
ord access for scan or update is 
virtually instantaneous. You 
can select records for printing 
as labels while (if desired) si- 
multaneously creating an ad- 
dress file in Mail-Merge 
(ASCII variable-length com- 
ma-delimited) format for use in 
word processing. You can also 
read in your existing “Mail- 
Merge”’ files. 
When released: March 1983 
Price: $100, includes SSSD 8” 
disc manual; inquire about oth- 
er disc formats. 
Available from dealers, or: 

Maurizi Associates 

1344 Fitch Way 

Sacramento, CA 95825 


(915) 486-2993 
CIRCLE #116 ON READER 
SERVICE CARD 


Program name: Quic-N-Easi 
AG® 


Hardware system: Z-80, 
CP/M, Addressable Cursor 
Minimum memory size: 64K 
Language: C and Assembly 
Description: Quic-N-Easi AG is 
an applications generator for 
the first-time microcomputer 


Software Directory 


continued 


user. It is simple to use and 
there is no coding, yet it is very 
powerful. The system consists 
of two major modules: the Ap- 
plications Generator and the 
Report Generator. 

The Applications Generator 
is used to set up, access, and 
maintain data files. It is used 
to write the data input, data 
editing, and data filing parts of 
the application. Easy data en- 
try is accomplished via “‘fill-in- 
the-blanks” type forms on the 
CRT. To write an application, 
a form is typed on the screen. 
Then the entry areas are identi- 
fied by placing the cursor 
where the data are to be en- 
tered. A form is displayed to 
specify the entry field defini- 
tion. Full editing, justifying, 
and forced entry can be speci- 
fied. In addition, range checks 
and calculations may be speci- 
fied. 

The Report Generator sorts 
files, performs calculations, ma- 
nipulates data, and prints re- 
ports to the printer, the screen, 
or to disk (any combination). 
Reports are created on the 
screen as they are to appear 
with up to 300 columns of hori- 
zontal scrolling. 

When released: October 1982 
Price: $295 

Included with price: Applica- 
tions generator, report genera- 
tor, utilities. 

Available from: 

Standard Microsystems, Inc. 
136 Granite Hill Court 
Langhorne, PA 19047 


(215) 968-1995 
CIRCLE #118 ON READER 
SERVICE CARD 


Program name: K Basic 
Hardware system: Any CP/M 
or Turbodos system 
Description: K Basic is Micro- 
soft’s MBasic 4.53 integrated 
with KISS (Keyed Indexed Se- 
quential Search) and 14 file 
handling verbs for applications 
that require heavy file transac- 
tions with extensive file man- 
agement capabilities. 

It gives Basic a wide range 
of Indexed Sequential and Di- 
rect Access record manage- 
ment. User applications under 
KBasic allow for multiple key 
access records, full DBMS ca- 
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BC-20 is the 20 megabyte solution to disk storage problems. 
The removable storage disk system that now makes unlimited 
storage available, reasonable and takes virtually no space. 


Fe INC. 1016 East 31st. Street 


LaGrange Park, Illinois. 60525 (312) 579-0672 
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(computers, peripherals, software) 
235022 yeary lane n.e./ p.o. box 225 
aurora, oregon 97002 


EASYKEY SPECIAL 


Customized WordStar installation program for Televideo 950..... $ 100 
EasyKey with WordStar program ........- 20. - seen eee eee eee 350 
Easy Key with Easy Grammatik & Easy Proofreader ............ 225 
Easy Key with Televideo 950terminal ..........--+--+++++5-- 1150 
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PRICES (Just a few of our low prices) 


Data Base Managers Word Processing Miscellaneous 
Condor III $495 Electric Webster $175 Archivist $135 
dBASE II 465 Palantir II 400 ATI Power (all) 75 
dBASE utilities Palantir [I (Apple) 295 Diagnostics IT 90 
ABStat $340 Perfect Writer 255 Disk Doctor 75 
DBPlus 90 Proofreader 50 Fancy Font 175 
DBWindow 215 Punctuation & Style 95 NWStatPak 375 
DGraph 200 Spellbinder 267 Power! 125 
DUtil 65 Spellguard 130 SmartKey 60 
QuickCode 226 SuperWriter 198 SuperVyz 85 
User's Guide 27.50 The Word Handler 150 
Milestone 275 ‘The Final Word 240 Language 
Pear! Level) II 275 The Word Plus 120 ADA $215 
Selector V 676 WordStar 282 MBasic 80 252 
WordStar Utilities MBasic Compiler 210 
Worksheets Bibliography $110  CComplier 210 
MultiPlan $228 Cardfile 80 CB-80 419 
Scratch Pad alez Footnote 110 +CBasic2 98 
SuperCalc II 150 Grammatik 75 CP + 125 
Mail Merge 135 Fortran 80 357 
@ Communications MathStar 110 Fortran 352 
Crosstalk $140 Thesaurus 128 =PL/1-80 420 
Lyne 125 z Unica 90 
Mite 110 Accounting , 
Move It 80 Champion cat Graphics 
Talk (Osborne) 90 SSG CALL Graftalk $395 
Plotware ‘Z' 360 


TO ORDER, CALL 1-503-678-2778 and we'll deduct 
2% from your total order to pay for your phone call! 


is here. 
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STORAGE UNLIMITED 
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The Bell 21712 Modem 
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pability and file management 
reliability. Ease of use and au- 
tomatic control of record sizes 
from 64 bytes through records 
of 512 bytes in length are pro- 
vided by the Direct Access File 
manager. 

Both the ISAM and DAFM 
file managers maintain deleted 
record buffer pools and space 
allocation checkpoints and thus 
eliminate all need for user file 
maintenance operations. Up to 
four ISAM and sixteen DAFM 


files can be opened for access 
at one time. Should it be de- 
sired to use a Basic Compiler, 
or MBasic level 5.x an inter- 
face to KISS from MBasic 
source code using “‘call’’ state- 
ments is available. 
When released: October 1982 
Price: $475; $22.50 plus $2.50 
S/H for User Guide 
Included with price: Disk and 
manual 
Available from: 

EIDOS Systems Corp. 
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for the S-100 Bus 
has Arrived 
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PMM 1 & Racal Vadic joined 
forces to bring you the 
first Bell 212A-compatible 
modem for the S-100 
bus. The MM-212 is a top 
quality modem designed 
to meet all physical, elec- 
trical & timing require- 
ments of the IEEE 696/ 
S-100 specification. FCC 
registered for direct con- 
nection to the telephone 
line. 


UNBEATABLE FEATURES: 

° Bell 212A (1200 baud) or 
Bell 103 (45.5-300 baud) modes 
Microprocessor based design 
Auto answer and auto dial 


1200 baud synchronous and asynchronous 
Full or half duplex 
Maskable interrupts 
Self test modes 
Access to PMM1's 24 hour a day test center 
Five year limited warranty 


FOR FURTHER INFORMATION, call or write for free brochure or send 
$10°9 (refundable w/purchase) for MM-212 Owner's Manual. 


COMMUNICATIONS 


5201 Leesburg Pike, Suite 604 


DEALER & OEM OPPORTUNITIES 
AVAILABLE 


Falls Church, VA 22041 
(703) 373-3660 


PMMI modems’ performance proves 


ALL MODEMS ARE NOT CREATED EQUAL 
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Box 3216 

Nashville, TN 37219 

(615) 297-7125 
CIRCLE #119 ON READER 
SERVICE CARD 


Program name: MemoPlan 
Hardware system: 8- or 16bit 
CP/M, PC-DOS, Xenix, 
UNIX 

Minimum memory size: 64K 
RAM and two floppy disk 
drives with at least 150K each 
Description: MemoPlan, with 
Concurrent Word Processing, 
makes up to five documents 
available at a time. The split- 
screen feature makes it possible 
to work on two documents si- 
multaneously and to transfer 
material from one document to 
the other. 

Designed for use by the ex- 
ecutive or secretary who may 
have limited experience with 
word processing, MemoPlan is 
a simple-to-operate system for 
the composition of memos, let- 
ters, and reports directly on the 
computer. Memo Plan matches 
all printers and can switch 
from a dot-matrix printer to a 
letter quality printer automati- 
cally, with true proportional 
spacing ability. 

MemoPlan automatically re- 
covers documents after a power 
outage and retrieves accidental- 
ly deleted material. It has only 
28 commands, features the 
ability to flip from one file to 
the next with a keystroke, and 
can be adapted to standard 
function keys or on-screen 
menus. It is a perfect subset of 
DocuPlan, Chang Labs’ full- 
featured document processor. 
Price: $195 
Included with price: 41-page 
manual 
Available from: 

Chang Labs 

5300 Stevens Creek Blvd., 

Suite 200 

San Jose, CA 95129 

(408) 246-8020 
CIRCLE #120 ON READER 
SERVICE CARD 


Program name: FilePlan 
Hardware system: 8- or 16-bit 
CP/M 

Minimum memory size: GAK 
RAM and two floppy disk 
drives with at least 150K each 


Software Directory continued . 


Description: FilePlan is an elec- 
tronic filing system designed 
for ease of data entry by the 
end-user. With FilePlan’s ex- 
clusive worksheet format, mul- 
tiple records can be viewed si- 
multaneously, and existing rec- 
ords provide examples for data 
entry. The features include spe- 
cial help commands, an on- 
screen menu, data validity (at- 
tribute verification) and user 
prompts. 

During query, the user is 
prompted through the process 
and is able to view data at each 
stage. The result of a query is 
displayed as a worksheet and 
may be changed, saved, or 
printed. Special prompts are 
supplied to assist inexperienced 
users. 

Record length can range 
from 128 to 2048 characters 
and a record may contain up to 
32 variable-length fields; maxi- 
mum field length is 99 charac- 
ters. Binary-tree indexing keeps 
records in proper sequence, au- 
tomatically updating the se- 
quence as records are modified. 
Price: $295 
Available from: 

Chang Labs 

5300 Stevens Creek Blvd., 

Suite #200 
San Jose, CA 95129 
(408) 246-8020 


CIRCLE #121 ON READER 
SERVICE CARD 


Program name: Font-19 
Hardware system: Super-19 ad- 
vanced terminal firmware 
ROM. Font-19 ROMs require 
minor modifications to the 
Z-19 terminal board; no trace 
cuts required. 

Description: Font-19, a series of 
advanced graphic firmware 
ROMs, has been designed to 
complement the Super-19 up- 
graded terminal firmware for 
the Zenith Z-19 terminal and 
Z-89/90 microcomputer. This 
allows the user to customize the 
Z-19 terminal graphics capabil- 
ities. Currently six advanced 
character graphics fonts are 
available. More will be avail- 
able in the future. Current 
fonts include the following: 

e Pixel Graphics ROM: The 
pixel graphics ROM upgrades 
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the Z-19 terminal to medium 
resolution graphics capability 
(160 by 100 pixels). Sample 
programs are available. 

e VT-100 Graphics ROM pro- 
vides an emulation of the DEC 
VT-100 graphics character set. 
e Tandy Graphics ROM emu- 
lates the Radio Shack Model 
III graphics and includes an 
excellent line-drawing and bar- 
chart facility in addition. The 
full ASCII character set can be 
displayed with the graphics 


CP/M users... 


characters using this ROM. 

e APL ROM provides the APL 
character set as an alternate to 
normal ASCII characters. 

e Math-Greek-Scientific ROM 
provides a full set of mathe- 
matics, Greek, and scientific 
symbols, equivalent to the sym- 
bols found on 128-character ca- 
pability letter-quality printers 
such as the NEC Spinwriter. 

e Script ROM provides a hand- 
writing-like character set alter- 
native to the normal ASCII 


| 


Make your move to 16-bit microcomputing... 
without ever leaving the 8-bit world. 


From CP/M* to CP/M-86* or MS-DOS* 
and back...on command. That’s the 
versatility CO-POWER-88™ brings to 
your CP/M machine. 

CO-POWER-88 adds the power of 16- 
bit microcomputing — the potential for 
more memory, concurrent processing, 
multiaccess file systems and shared 
code — without impairing CP/M opera- 
tion. Not only does your CP/M computer 
remain intact, you can even use CO- 
POWER-88 RAM as a simulated high- 
speed CP/M disk drive. 

Built around the 8088 microprocessor, 
CO-POWER-88 provides dual-process- 


XEROX 820 Dual Densit 


Upgrade . 
XEROX 820-II Ext. Dual Density Upgrade 
BIG BOARD Dual Density Upgrade ... 


ing power for almost any Z-80* or 8080 
machine operating under CP/M (2.2)... 
including the Kaypro, Xerox, Big Board 
and ATR8000-CP/M personal computers. 
A CO-POWER-88 costs only $499.95 
with 128 Kbytes of RAM, CP/M-86 with 
SWP’s special BIOS is $249.95 and 128- 
Kbyte RAM expansion (for 256 Kbytes 
total) is $349.95. Or, save almost $100 by 
oeoune CO-POWER-88 already equip- 
ped with RAM expansion and CP/M-86— 
only $999.95. Call for prices on CO- 
POWER-88/MS-DOS systems. 


Available soon...IBM PC emulation software! 
$199.95 


$100.00 
$150.00 


inc 
MICROCOMPUTER PRODUCTS 
We used to be Software Publishers, Inc 
2500 E. Rando! Mill Road 125 
Arlington, Texas 76011 
817/469-1181 


ATR8000 and CO-POWER-88 are trademarks of SWP Micro- 


ee 
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Yes...I'd like to know more about SWP’s ll CO-POWER-88 
@ Dual Density Upgrades. Please rush me free literature 


Send to: SWP Microcomputer Products, Inc., Dept. 300 


2500 E. Randol Mill Road (125) 
Arlington, TX 76011 


state 
MAIL TODAY! 


DEALER INQUIRIES 
INVITED 


PRICES AND SPECIFICATIONS 


“*J SUBJECT TO CHANGE WITHOUT NOTICE 
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character set. 

All Font-19 character graph- 
ic ROMs allow use of normal 
Z-19 character set graphics, 
and shift to the extended 
graphics capability mode when 
in the alternate character set. 
Available from: 

Extended Technology 

Systems 

1121 Briarwood 


Bensalem, PA 19020 
CIRCLE #122 ON READER 
SERVICE CARD 


Program name: Super-19 firm- 
ware upgrade kit 

Description: The Super-19 up- 
grade kit for the Zenith Z-19 
terminal and Z-89/90 micro- 
computer extends the terminal 
editing features of the terminal 
(and microcomputer) to include 
the editing features of the DEC 
VT-100 terminal. These fea- 
tures give the user the ability 
to run programs optimized to 
the DEC VT-100 editing capa- 
bilities rather than in VT-52 
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dBASE-II® may be better, but not 7 times better. . . 


THE TARBELL DATABASE SYSTEM 


e Runs under CP/M 2.2® or MP/M-II® 
e Fast Balanced-Tree Indexes 

e Extensive HELP System 

¢ Multi-Line Field Type 

¢ Multi-User File Locking 

e Interactive Program Generator 

e 12-Digit BCD Numeric Precision 

¢ Transfer to/from other formats 

e Multi-Field Sort 

e Up to 65,535 Random Records 


e Long Field Names with spaces 


© Sequential or Random Files 
e Interactive File Set-up 

e BASIC-Like Query Language 
e Command File Interpreter 

e User-Creatable Menus 

e Macros can have spaces 

e Up to 19 Files Open at once 
e Up to 100 Fields in a File 

e Letter/Mailing List Merge 


e Up to 4000 characters per 
record 


e Julian Date Field Type 


The Tarbell Database System was written for both non-programmers and 
programmers who want to write special applications. By using the Program 
Generator, the Entry Module, and the Report Writer, non-programmers can 
set up systems to perform a variety of tasks. Programmers will find the 
Query Language Interpreter makes their time much more productive. 


The complete Tarbell Database System, including manual 
Source on disk, written in CB-80® , costs an additional 


A variety of formats are available. Specify when ordering. 


CP/M, MP/M-II, and CB-80 are trademarks of Digital Research. dBASE-II is a trademark of Ashton-Tate. 


TARBELL ELECTRONICS 
950 Dovien Place, Suite B, Carson, CA 90746 
Phone (213) 538-4251, (213) 538-2254 
Manufacturer of Computers, Components, and Software since 1976 
CIRCLE 223 ON READER SERVICE CARD 
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mode, currently supported by 
standard Z-19 terminals. Since 
the keys on a Z-19 do not cor- 
respond to those of the VT-100, 
a special set of key codes has 
been implemented to provide 
convenient EDT operation. A 
template is provided that can 
be copied and placed around 
the Z-19 keys. 

Most of the VT-100 features 
have been implemented, except 
for large characters, smooth 
scroll, 132-character lines and 
keyboard LEDs. Escape se- 
quences relating to these func- 
tions are processed, but no op- 
eration is performed. Other 
features of the Super-19 in- 
clude: 

e Definable Scroll Areas: from 
2 to 25 lines can be set scroll- 
able while the remaining lines 
are fixed 

e Extended Transmit Capabili- 
ty: the top of bottom fixed re- 
gion, the scroll area, the cur- 
rent line or the current charac- 
ter may be transmitted 

e Complete Tab Facility: tab 
stops can be individually set 
and cleared or set at fixed in- 
tervals 

e Clock and Calendar: reports 
hours, minutes, and seconds in 
ASCII format, similiarly for 
date 

e 8-bit Data Mode: all 8 data 
bits are transmitted and dis- 
played 

e 8-bit escape sequence mode 
e Hardware handshaking 

e Slow transmit mode 

e Light pen position reporting 
e Expanded cursor control 
functions 

In addition, all function keys 
produce different escape se- 
quences when shifted. Full du- 
plex, half duplex, and baud 
rates up to 38,400 baud are 
supported. All Heath functions 
are retained, and all new fea- 
tures are supported in both 
Heath/VT-52 mode and 
ANSI/VT-100 mode. 

Price: $49.95 
Available from: 
Extended Technology 
Systems 
1121 Briarwood 


Bensalem, PA 19020 
CIRCLE #123 ON READER 
SERVICE CARD 


Software Directory 
continued . 


Program name: SCREEN 
MASTER 
Hardware system: CP/M, 
MP/M, CP/M-86, MP/M-86, 
IBM-PC, Sirius under MS- 
DOS, and PDP/11 under 
UNIX 
Languages: C, Bascom, PCBa- 
sic, Pascal MT +, PL/I, Cobol 
Description: SCREEN MAS- 
TER is a very extensive screen 
management system. It is dic- 
tionary-driven and automati- 
cally handles all aspects of 
screen layouts, visual screen 
characteristics, cursor move- 
ment, help text, data editing, 
and integrity checking during 
data entry. Screens are termi- 
nal and program independent. 
SCREEN MASTER con- 
sists of two powerful languages: 
Screen Description Language 
(SDL), which enables the ap- 
plication developer to define 
screens for an end user (these 
screens can be used for both 
data display and data entry); 
and (2) Screen Manipulation 
Language (SML), which con- 
sists of screen manipulation 
commands that can be invoked 
from a programming language. 
SCREEN MASTER cuts 
screen-generation time and ap- 
plication development costs 
through use of a high-level lan- 
guage instead of traditional 
cursor-position commands used 
in host programming lan- 
guages. Advantages include its 
sophisticated error-checking 
routines and the independence 
of the actual application pro- 
gram itself. SCREEN MAS- 
TER can be used with the 
MDBS III data base manage- 
ment system or in the “stand- 
alone”’ mode. 


When released: November 1982 


Price: Depends on OS, hard- 
ware, and host language: 
$2,500 to $18,750 


Included with price: SDL, SML, 


comprehensive documentation 
Where to purchase it: 
ISE-USA 
85 W. Algonquin Rd., 
Ste. 400 
Arlington Heights, IL 60005 
(312) 981-9200 
(800) 323-3629 
CIRCLE #124 ON READER 
SERVICE CARD 


NORTH STAR 
USERS 


Convert to: 
IBM PC 
CP/M 
CP/M-86 


MSDOS 


UPWARD COMPATIBLE WITH 
NORTH STAR BASIC 
BUT TWICE AS FAST 


@ Faster than many compilers 


®@ Sorts faster than conventional 
Basics 


@ Reduces programming time at least 
30 percent 


@ Simple to use 
Easy testing and debugging 
Excellent TRACE and EDIT 


More memory available — 
Less required for programs 


Accurate arithmetic 


Excellent documentation and 
customer support 


DEMO DISK AND 
MANUAL $50 


BUY NOW-SAVE $25 
$375 


ORDER NOW! 
Dealer inguiri s 


Check VISA of MasterCard accepted 


Suite 423, 4600 Duke Street 
Alexandria, Va. 22304 
703-751-2574 
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ELECTRIC MOUTH 


——— 


for $100, Elf II, Apple, TRS-80 Level II* 


From $99.95 kit 


Now — teach your computer to 
talk, dramatically increasing 
the interaction between you 


and your machine. 


That's right: the ELECTRIC MOUTH actually lets 
your computer talk! Installed and on-line in just 
minutes, it's ready for spoken-language use in office, 
business, industrial and commercial applications, 
in games, special projects, R&D, education, secu- 
rity devices — there's no end to the ELECTRIC 
MOUTH's usefulness. Look at these features: 

* Supplied with 143 words/letters/ phonemes/ 
numbers, capable of producing hundreds of words 
and phrases. 

* Expandable on-board up to thousands of words 
and phrases (just add additional speech ROMs as 
they become available). 

* Four models, which plug directly into $100, Apple, 

Elf II and TRS-80 Level II computers. 

* Get it to talk by using either Basic or machine 
language (very easy to use, complete instructions 
with examples included). 

* Uses National Semiconductor's ‘‘Digitalker" 
system. 

* Includes on-board audio amplifier and speaker, 
with provisions for external speakers and 
amplifier. 

* Adds a new dimension and excitement to pro- 
gramming; lets you modify existing programs and 
games to add spoken announcements of results, 
warnings, etc, 

* Installs in just minutes. 

Principle of Operation; The ELECTRIC MOUTH 
stores words in their digital equivalents in ROMs. 
When words, phrases, and phonemes are desired, 
they are simply called for by your program and then 
synthesized into speech. The ELECTRIC MOUTH 
system requires none of your valuable memory 
space except for a few addresses if used in memory 
mapped mode. In most cases, output ports (user 
selectable) are used. 

Spoken Material Included 

at 


one eighteen dollar inches number ss et 
two nineteen cancel down is of second du 
three twenty case equal it off sete y 
four thirty cent error kilo on space f w 
five forty 400hertz tone feet left out speed x 
six fifty 8Ohertz tone flow less over sar y 
seven sixty 20ms silence fuel lesser parenthesis start i z 
eight seventy 40ms silence gallon limit percent —_ stop 

nine eighty” —goms silence go low please. thank 

ten ninety 160ms silence gram lower plus the | 
eleven hundred 320ms silence great mark point time om 
twelve thousand centj reater meter pound try n 
thirteen million — check ave mile pulses up ° 
fourteen zero comma high = milli_ rate volt P 
fifleen again control higher minus re weight q 
sixteen ampere danger hour minute ready a ¥ 
seventeen al degree in near right b s 


““Elf II and “The Electric Mouth” are reg. trademarks of 
Netronics R&D Ltd. “Apple” is a reg. trademark of Apple 
ral Inc. “TRS-80 Level II” is a reg. trademark of Tandy 

rp. 


Continental U.S.A. Credit Card Buyers Outside Connecticut 


: CALL TOLL FREE 800-243-7428 
10 Order From Connecticut Or For Technical Assistance, Etc., s 
: Call (203) 354-9375 H 
‘NETRONICS R&D LTD. dept ms = 
» 333 Litchfield Road, New Milford, CT 06776 # 
# Please send the items checked below: 8 
* C) $100 “Electric Mouth” kit .............. $99.95 8 
« LJ EMM “Electric Mouth” kit .............. $99.95" 
: LJ Apple “Electric Mouth” kit............. $119.958 


Add $20.00 for wired & tested units. All plus $3.00 postage & in- : 
surance. Conn res. add sales tax. + 

® Total Enclosed $ 7 
LJ) Personal Check CZ) Cashier’s Check/Money Order ‘ 
20) Visa Ci Master Charge (Bank No. ___)# 
7 Acct. No H 
s 

H Signature Exp. Date | 
= Print 2 
+ Name . 
s n 
* Address 7 
s 

«City : 
® State : 
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80 MB super micro 

Dual Systems is now ship- 

ping its System 83/80, the fast- 
est member of its popular Sys- 
tem 83 series. The Model 83/ 
80 combines the MC68000, 
UNIX, 10 MHz, IEEE-696/S- 
100 bus with 80 MB of hard 
disk storage and its SMD con- 
troller. The SMD disk storage 
and its SMD controller. The 
SMD disk controller offers the 
highest data throughput attain- 
able in a controller with a sin- 
gle track buffer. It transfers all 
sectors on a track within essen- 
tially a single disk rotation, re- 
gardless of the place over 
which the head first settles. 
This controller is proprietary to 
Dual Systems. 


The 83/80 can be expanded 
to accomodate 16 users and 
168 MB of storage, and its 20- 
slot backplane can accomodate 
up to 3.25 MB of parity RAM. 
The 83/80 technology can also 
be supplied as a set of circuit 
boards to qualified systems in- 
tegrators. 

Price: $2,990 

Dual Systems Corp., 2530 
San Pablo Ave., Berkeley, CA 
94702; (415) 549-3854. 
CIRCLE #125 ON READER 
SERVICE CARD 


RACOM Datafinder 

The RACOM Datafinder 
provides fast solutions to file 
searching, text processing, and 
pattern recognition problems. 
The Datafinder is an S-100 
board running asynchronously 
at over 16 MHz, with a pro- 
gramming interface absorbed in 
only a few minutes. Control is 
via a single port address for in- 
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ward status and outward com- 
mand. Data is accessed via a 
24-bit addressed store. The 
board compares, bit by bit, 
Test Data with programmable 
Reference Data, using only bits 
that are marked Valid for com- 
parison. The results of these 
tests are recorded in a corre- 
sponding Solution bit. 

A record may be compared 
on a field-by-field basis, and 
each Field may be tested for 
“Test > Reference”, “‘Refer- 
ence > Test’’, or “Reference 
= Test”. 

There is a facility for provid- 
ing bit and byte offsets to the 
Test Data prior to the compari- 
son process, to facilitate search- 
ing for text within a block of 
text. All of the 12K on-board 
static RAM store is user pro- 
grammable. 

This board can be used to 
implement a Content Addressa- 
ble File Store by bringing in- 
formation in from a Winchester 


disk and then analysing this 
data according to criteria pre- 
programmed in the Datafinder. 

Data can be simultaneously 
written to a number of Datafin- 
ders and asynchronously ana- 
lysed according to different cri- 
teria at the same time. Status 
information from the Datafin- 
der gives the total number of 
hits (successful comparisons) 
together with the address of the 
first hit. 


Price: £850 

RACOM, Decision Systems 
Division, 5 Neston Way, Hand- 
forth, Wilmslow, Cheshire, 
SK9 3BX, England; phone: 
(0625) 52-8979. 
CIRCLE #126 ON READER 
SERVICE CARD 


Universal EPROM 
programmer 

The UP-8 EPROM program- 
mer supports both single- and 
three-voltage NMOS and 
CMOS EPROMs, from 512 x 
8 (2704) through 32K x 8 
(27,256), without the need for 
personality modules or socket 
adapters. EPROMs supported 
by the UP-8 include: 2704: 08, 
16, 32, 64, 128, 256; 2732A; 
TMS 2516: 32, 64; TMS 716; 
MCM 68732: 64, 66; and all 
generic equivalents (more than 
125 devices). 


The UP-8 operates with any 
8080, 85, Z80 CP/M-based 
computer containing a mini- 
mum 56K of RAM. Interface 
to the computer is through a 
single RS-232 communications 
port. Baud rates of 50 to 
19,200 are switch-selectable. 

The UP-8 is supplied with 
two software packages: 
BLOCKER and PRGMR. 
BLOCKER furnishes all utility 
functions necessary for parti- 
tioning long object files into the 
appropriate lengths necessary 
for programming EPROMs. 
Any one of the three checksum 
types may be computer auto- 
matically. Partitioned files are 
then written to disk as a group 
of named files for future use in 
EPROM programming. 

The PRGMR software pack- 
age provides 21 utility com- 
mands, including ERASE 
CHECK, COPY, EDIT, PRO- 
GRAM, and COMPARE, all 


New Products 
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activated via single-keystroke 
commands. An AUTOMATIC 
mode executes ERASE 
CHECK, PROGRAM, and 
COMPARE functions consecu- 
tively without operator inter- 
vention. The EDIT command 
permits the amendment of ex- 
isting files and/or the creation 
of new files. 

Price: $695; includes soft- 
ware on 5%" or 8” disk, user’s 
manual, and documentation de- 
tailing how to write a non-CP/ 
M driver. 

Advent PRODUCTS, Inc., 
965 N. Main St., Orange, CA 
92667; (714) 997-0800. 

CIRCLE #127 ON READER 
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Telephone interface 
with speech 

The CompuFone is a versa- 
tile telephone interface and 
speech storage/output device 
for IEEE/696/-100 bus com- 
puters. FCC-approved for di- 
rect connection via a standard 
modular phone jack, the Com- 
puFone originates and answers 
calls. An on-board Touch-Tone 
decoder allows the entering of 
commands from a remote tele- 
phone. The voice digitizer sub- 
system allows speech recording 
from the telephone or from ei- 
ther the MIKE IN or LINE 
IN connections on the board. 
Previously recorded speech can 
be sent out the phone line or 
reproduced locally via an audio 
amp hooked into the LINE 
OUT connector. 

Possible applications include: 
intelligent phone answering, 
voice mail systems, database 
query with voice output, order 
entry and inventory control, au- 
tomatic telephone soliciting and 
data gathering, ham-radio re- 
peaters and phone patches, 
paging /announcement systems, 
sophisticated alarm systems, 
dictation and transcription, 
computer-aided instruction, re- 
mote control of the computer 
from any telephone, and (with 
two boards in a system) call re- 
routing. 

Price: $995; manual only, 
$30; software on disk, $20. 
Computalker Consultants, 


MIDWEST MICRO 
WAREHOUSE 


3437 Holmes e Kansas City, MO 64109 e Phone (816) 753-1304 


Uist MMW LIST MMW 


i 8” MS-DOS SOFTWARE: 
parapet ce a | MS-DOS 1.2X IO.ASM FOR COMPUPRO 


COMPUPRO SYSTEM A 5495, 4590. | Dick’) @ SCP CARDS (MMW/COMPUVIEW 
COMPUPRO SYSTEM B 7995. 5590. PRODUCTS) 150. ‘135. 
COMPUPRO SYSTEM C 8995. 6690. | ASCOM (DMA-THE ULTIMATE MODEM 
SEATTLE GAZELLE 5995. 4395.| PROGRAM) 195. 160. 
ASHTON-TATE DBASE I-86 700. 420. 
MICROSOFT MULTIPLAN 500. 345. 
PRINTERS: MICROSOFT BASCOM 86 400. 270, 
DIABLO 620 1595. 1175. | MICROSOFT FORTRAN77 400. 270. 
NEC 3510, 3515 1995. 1385. | MICROSOFT PASCAL 400. 270. 
OKIDATA 83-A 995. 707 ae Gite . 75. 70. 
OKIDATA 84-A 1045. UN 
So aac W/EMULATOR-86!!!) 295. 165, 
SORCIM SUPERWRITER (BETTER 
TERMINALS: THAN WORD*!) 395. 247 
HAZELTINE ESPRIT | 595. 499. | COMPUVIEW VEDIT-86 195. 175. 
patag ae 995. 725, | PERFECT WRITER (PERFECT SOFTWARE) 395. 280. 
: * | WATFIV FORTRAN 4 
ii Oo 195, 95, | WATFIV FORTRAN ‘66 (SUPERSOFT) 425. 325. 
apna St ee CORO SS HEAII) DRIVE 
VISUAL 300 1195. 975. j MDRIVE) 1595. 1445. 
as 745, 695, | PARADYNAMICS PRONTO 1595. 1355. 
: "| HAYES SMARTMODEM (1200 BAUD) 695. 549, 
TEI DFD-O (DEMO) 595. 445. 
COMPUPRO APPROVED 20 MB HD 
SUBSYSTEM 3695. 3295. 


TAPE DRIVES, SEATTLE & COMPUPRO CARDS, NORTH STAR ADVANTAGE, MS-DOS 
FOR COMPUPRO 8/16 SYSTEMS, ETC. IT’S HERE! CALL!!! 
TERMS: COD CERTIFIED CHECK OR CORPORATE PURCHASE ORDER W/BANK REFERENCE 
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S-100 NEWS BULLETIN 
OCTAFLOPPY' 


FLOPPY DISC CONTROLLER CARD HANDLES EIGHT 
FLOPPY DRIVES, SINGLE/DOUBLE DENSITY, 
SINGLE/DOUBLE SIDED! 


The ADS OCTAFLOPPY™ Disc Controller is an S-100 compat- 


ible slave card providing up to 9.6 megabytes of on-line storage. 


FEATURES: 

@ Uses the Western Digital \/D2797 and DM1883. 
Supports Temporary Master Access. 

» 0-4 Wait States for use up to 10 Mhz Bus. 
Extended Memory Access. 
Extended Device Option. 


FOR MORE INFORMATION CONTACT: 


aw Ackerman Digital Systems, Inc. 
N10 N. YORK ROAD @ ELMHURST, ILLINOIS 60126 


TELEPHONE: 312/530-8992 
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1730 21st St., Santa Monica, 
CA 90404; (213) 828-6546. 
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EPROM programmer/ 
real-time clock 
TimEPROMmer (TP-100) is 
unique in that the calendar/ 
clock and the programmer are 
both on one board and indepen- 
dently addressable. The 
EPROM programmer supports 


New Products continued 


mote exchanging of EPROMs 
via an extender harness (not in- 
cluded). 

Extensive CP/M software is 
executable from the menu and 
allows read, verify, program- 
ming, disk transfers, etc. Inex- 
pensive personality headers are 
used for maximum device com- 
patibility with future EPROMs 
having up to 28 pins. 

All versions include extensive 
source software and documen- 
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68000 computer 

By incorporating half-height 
floppy disk drives, Sage Com- 
puter Technology has further 


already compact-size Sage II 
micro to just 3.9” high by 
12.5"" wide by 16.7’ deep. The 
low-profile Sage II comes stan- 


2708, '16, '32, '32A, and ‘64 tation. 
type single-voltage EPROMs. Prices: Bare board, $75; 
Port mapping is implemented complete kit, $195; A&T fully 
so that no memory space is guaranteed units, $295. 

used. Access to the board is not Optronics Technology, P.O. 
mandatory due to software con- Box 81, Pittsford, NY 14534; 
trol of voltages’ this allows re- (716) 377-0369. 


BTA MODEL 953B EPROM PROGRAMMER - $359 


Programs 2508, 2758, 2516, 2716, 27C16, 2532, 2732, 2732A, 27C32, 2564, 
2764, 27C64, MCM68766, 27128. 

RS-232, 3 line serial interface, Xon/Xoff format, DB-25 I/O connector. 

No personality modules - software control EPROM selection. 

Extended diagnostics. 

LED warning indicates power applied to EPROM socket. 

Supports Intel, Motorola, and Intel 8086 data formats as well as HEX data 
dump. 

Automatic baud rate selection. 

Textool zero insertion force socket. 

Available CP/M software. 


dard with 128K and can be ex- 
panded to 0.5 MB of on-board 
RAM. The minimum configu- 
ration includes one built-in, 
half-height, 640K floppy drive 
with room for a total of two. 
All Sage 16-bit, 68000-based 


reduced the dimensions of the 


BAY TECHNICAL ASSOCIATES, inc. 


HWY. 603, P.O. BOX 387 
BAY ST. LOUIS, MISSISSIPPI 39520 
(601) 467-8231 


Model 953A, programs most 24 pin EPROMS. 


Price - $269.00 
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WE GAVE YOUR DRIVES THE FIRST BREAK THEY EVER HAD... 


inactivity wins using a state of the art optoiso ator 

with zero crossover control and built in activity monitor. 

We've continued to improve the design (it’s the size of a business card to 

fit within the drive), ease installation time (about 15 minutes) and models are 
now available for virtually all popular 8 inch drives (including a foreign version). 
So for those of you, who are still grinding down your drives, wearing out media 
and exposing yourself to unnecessary noise...isn’t it time to give them a break? 


Kit with Documentation ........... $29.95 
Type of drive MUST be stated with order. 
NY residents add local tax. Include $1.50 

for postage and handling. 

OPTRONICS TECHNOLOGY — 
P.O. Box 81, Pittsford, N.Y. 14534, (716) 377-0369 
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New Products 
continued... 


systems operate at 8 MHz. 
Price: Sage II, with one flop- 
py drive, 128K RAM, and a p- 
System operating system is less 
than $3,600. CP/M-68K is 
available optionally.128K 
RAM expansion blocks, con- 
sisting of only two devices, are 


Sage Computer Technology, 
35 N. Edison Way, Suite 4, 
Reno, NV 89502; (702) 322- 
6868. 
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Full CAD program for 


microcomputers 
AutoCAD is a two-dimen- 
sional computer-aided drafting 
and design package that runs 
under CP/M-80, CP/M-86, or 
MS-DOS/PC-DOS. It is a 
general-purpose package suit- 
able for a wide variety of appli- 
cations such as architectural 
and landscape drawings; me- 
chanical, electrical, chemical, 
structural, and civil engineer- 
ing; and printed-circuit design. 
AutoCAD acts like a word 
processor for drawings. It lets 
the user make drawings from 
simple components such as 
lines (of any width), circles, 
arcs, and solid-filled areas. 
Drawings may be created 
through keyboard commands, 
with a light-pen and on-screen 
menu, or from existing paper 


| 
| 


COMPUPRO USERS 


eBl0S-80, BIOS-86, XIOS-86 
eTrack buffering, Interrupt 
driven 1/0 
eExecute CP/M-80 programs 
with CP/M-86 or MP/M-86 
eMorrow M5, M10 hard disk 
support 
eMemory disk implemented 
eSource code included 
ePrices from $15-$100 
Lanier Computer Systems 
3603 23rd Ave. 
Shawmut, AL 36876 
(205) 768-2616 
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MAGNOLIA 
MICROSYSTEMS 


Makes the 
ZENITH 
89/930 

a REAL 


Business Computer 


The solid Dependability of the Z89/90 with the 
Flexibility to configure it the way you need. 
* Memory Boards: 16-128 KBytes 
* Hard Disk Interfaces and Subsystems: 5-SO MBytes 
* Floppy Disk Controller: Mix 8" and 5" drives 
* MMS-Net™ Networking 
* High-Speed/High-Capacity Auxiliary Processor 
* The most powerful, flexible CP/M” available 
Ask your Zenith desler about Magnolia products 
MAGNOLIA MICROSYSTEMS, INC. 
264 15th Ave. West * Seattle, WA 9811 
(206) 285-726 (800} 426-2841 
CP/M is @ trademark of Digital Research 
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SAL/80® ana SAL/86™ 


do for assembly language what 
RATFOR does for FORTRAN 
but emits 
OPTIMALLY DENSE code. 
SAL/8X includes console I/O 


S-100 Boards from S. C. Digital 


new 80186 CPU BOARD 


features: Model: 80186 CPU 

© Intel 80186 Based @ Executes 8086 codes plus 10 
additional @ built in DMA channels, timers, interrupt 
controller @ Interface to Numeric Data Processor, 8087 @ 8 
or 16 bit data transfer, with 4 or 8 MHZ clock @ Provision to 
run 2 different CPU's on the bus, such as our M:Z80 CPU. 


Z80B CPU BOARD 


features: Model 280 CPU 

@ 2, 4 or 6 mhz clock. @ 22 bit Address by Memory 
Mapping in 16K blocks. @ 2 or 4Kbyte EPROM (not 
supplied) with Phantom generation. @ Jump on Reset. @ 
Provision to run two different CPU's on the same bus, such 
model 8186 CPU. 


FLOPPY DISK CONTROLLER 
features: Model FDC1 


@ Single or Double density, sides, in any combination of up 
to four 8" or 5.25” drives. @ Digital phase locked loop. 
@ DMA data transfer with cross 64K boundaries, 24B 
address, DMA arbitation. @ Monitor/boot EPROM accomo- 
dating two different processors. @ CPM Bios programs. 
@ Serial port to 19.2K baud. 


256K DYNAMIC RAM 


features: Model 256KZ 

@ 8/16B Data, 24B Address. @ Parity bit per Byte @ 
Transparent refresh @ Unlimited DMA @ 180nsec. Access 
time @ Will run 8086, 8088, 68000 to 8mhz, 280, 28000 
to 6mhz without wait states. 


64K STATIC RAM 


features: Model 64KS 

© 8/16B Data 24B Address @ Disable in 2K increments @ 
180nsec Access Time (with 64KB) from address on, runs 
8086, 68000 to 10mhz, Z80, Z8000 to 8mhz without wait 
states @ Battery back up capable. 


Board Sets: For Limited Time Only! 

@ Z80B CPU, DMA Floppy Controller, CP/M 2.2, 64KB 
Static Ram $1,000 

@ 2Z80B CPU, DMA Floppy Controller, CP/M 2.2, 250KB 
Ram $1,250 

@ For CP/M Plus instead of 2.2 add $50 

Please call for latest prices. 


All boards conform to IEEE696/S100 specifications, fully 
socketed, screened legends, masks, Gold contacts. Guaranteed 
One Full Year. 


Cae . o 8 ge Model Prices with 
drawings via a digitizing tablet. primitives which trivialize the task of sink Cod ea rine 
Systems currently supported writing complex interactive user ae ar aa 
include CP/M-80 machines interfaces. Improves programmer $695 —_256KB, Party 
with Scion MicroAngelo graph- productivity by a factor of two and ; cant duretaie 
ics subsystem and optional program maintainability by an order Oe RMR 
light-pen, Victor 9000 with of magnitude. $55 Purchased with FOCT 


$105 Purchased with FOC! 
780 Monitor $55 2K in EPROM, source code, for 35PC 
All Boards come assembled and tested. 


Extensively documented, available 

forall CP/M compatible disk formats. 

SAL/80 version 2.1, $59.00, requires 
64K and MAC or RMAC. 


CALIFORNIA RESIDENTS ADD 6% SALES TAX. 
PROTOOLS® 
“Software Tools forthe Professional’ 
24225 Summerhill Avenue 


Los Altos, CA 94022 
(415) 948-8007 
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256K RAM and optional Sun- 
Flex Touch Pen, and IBM PC 
with 128K RAM and monoch- 
rome and color graphics card. 
All systems support Summa- 
graphics and Houston Instru- 
ments digitizers, and complete 
range of Hewlett-Packard and 
Houston Instruments plotters. 


Delivery is within 3 to 5 working days. MC, Visa or COD 

orders accepted. (Add $6 for COD orders) Illinois residents 

add 54% sales tax. 

“CP/M is a registered trademark of Digital Research, Inc. 
0.E.M. & DEALER PRICE AVAILABLE 


S.C. DIGITAL, INC. 
1240 N. Highland Ave., Suite #4 
P. 0. Box 906, Aurora, Illinois 60507 
Phone: (312) 897-7749 
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EPROM 
Prog sranmnng 
Monitor (EPM) 


EPM is a hardware independent software 
package that programs EPROMs directly 
from CP/M* or MP/M II* disk files. EPM can 
be operated in the standard user friendly 
menu mode of operation or in the EPROM 
Editor mode for users needing the capabili- 
ty of modifying files or EPROMs at the byte 
level. It automatically verifies EPROM 
erasure prior to programming, provides 
positive confirmation of successful data 
transfer and reports any discrepencies 
directly to the operator. The cost of EPM 
is $75 and includes all documentation. The 
EPROM Editor option is $45. 


DANTE K Software, Inc. 


4550 Schoolhouse Rd 
Batavia, Oh 45103 
513 / 752-4924 


“CP/M and MP/M are trademarks of Digital Research 
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 EPROMS 9 CP/M 


EPROM PROGRAMMING SYSTEM RUN: DER 


PROGRAMS: 2708, 2758, 
2716, 2732, 2732A, 
2764 and 27128. 


~ FEATURES = 


~ INTERFACES THROUGH ONE 8 BIT INPUT PORT AND ONE 8 BIT 
OUTPUT PORT. 16 WIRES - NO SPECIAL HANDSHAKE LINES. 


~ CONTROL SOFTWARE COMMANDS ~ 
~ PROGRAM EPROM(S) : ; COMPARE Bena W/RAM 


FROM DISK FILE MIS ERASED 
- AM EPRO! 

RAM —_ /MODIFY RAM aceon 
qonrron HAS 11 SUB COMMANDS 
ILL-DUMP-XFER-MODIFY ETC.) 
(Ca ALSO AVAILABLE FOR OSBORNE 1 (TM) 

BARE P.C, BOARD WITH COMPLETE DOCUMENTATION 
AND SOFTWARE ON AN 8” SINGLE DENSITY DISKETTE 
TO ORDER SEND CHECK,MONEY ORDER OR CALL 


WRITE OR CALL FOR MORE INFO.” 513/752-7218 


as encea toe tex a AndraTech 

$3.00 for C.0.D. ACCE! BOX 222 
MILFORD, OHO 45160 
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6048 IN-CIRCUIT 
EMULATOR 


- IEEE-696 (S-100), CP/M compatible 

- Emulates 8035, 8039, 8048, 8049, 
8748, 8040, 8050, and 80C48 CMOS. 

- Hardware Breakpoints allow Real Time 
Emulation upto 11 MHz 

- Trace includes disassembled code 

- Display/Modify Program & Data Memory, 
Registers, |/O Ports & Flags 

- Scope trigger from breakpoint locations 


Emulator comes on one S-100 board with a 3 ft. 
cable and buffer assy. that plugs into the user's 
uP socket. The board with all supporting 
software is $995. For 8048 MACRO Assembler 
add $150. 

A portable development system withCRT, two disc 
drives and emulator is $3200 (213) 4515382 


SIGNUM SYSTEMS 
726 Santa Monica Blvd. 
SANTA MONICA, CA. 90401 
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The meee super ae 


Free Computer with « Purchase of a RAM Disk 


% Z80B Running at Smhz, * Versatile CPM, * Math chip 9511 or 
9512 AMD, * 48 Plus Ports on Mega Expander BUS, * CTC, 
DMA, *2 Parallel Ports—with hand shaking, » Serial 
Ports—with or without hand shaking runs 150 to 19K2 Baud, Runs 
most terminals, printers, and modems 


% NOW! CPM 3.0. 

% Hard Disk Interface hooks directly to Priam Drives. 

* Floppy Disk Controller—Handles Single Density |BM compatible 
disks and Dual Density 1 or 2 sided supports. 8” or 5'/" in various 
combinations—3 Drives equal over 4 Mega Bytes of Storage. 
Ww02797. 

* S12K Bytes of 64K D-rams with parity configurable as a HIGH 
SPEED ELECTRONIC DISK of 8 banks of 64K for multi-user or 
countless other applications. 

* All this on a state-of- the-art 4 layer card—with accurate 
documentation—10" x 15". 

* Prices: Bare Board with Documentation. 

64K Base System A &T 
512K Base System A &T 
CPM 2.2 System 


w MEGA CO. = 


2318 S. Park Street, Madison, WI 53713 (608)255-7400 
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Price: $1,000. 
Autodesk, Inc., 16 St. Jude 
Rd., Mill Valley, CA 94941; 


(415) 381-1819. 
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SV DC power supply 
with UPS capabilities 
The Model MUP-0503 is 
specifically designed to provide 
ultra-reliable SV DC power to 
a microprocessor logic and 
memory system. The UPS ca- 
pability is incorporated within 
the unit. The MUP-0503 com- 
pletely replaces a standard 
power supply. Internal nickel 
cadmium batteries power the 
computer memory for over one 
hour in the event of line fail- 
ure. 


Input voltage: 100 to 132V 
AC; 47 to 63 Hz; 10 25VA 
maximum. Output voltage: 5V 
DC @ 3A. Available with en- 
closure or an open printed cir- 
cuit board. 

Price: $150 

Instrumentation and Control 
Systems, Inc., Electro-Pac 
Division, 520 Interstate Rd., 
Addison, IL 60101; (312) 


543-6200. 
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THE WORLD’S FIRST S-100 BUS PORTABLE COMPUTERS 
Star-lite HD20 * Star-lite Quad * Star-lite 


—THE WORLD'S FIRST PORTABLE COMPUTER 
WITH BUILT-IN 20 MEGABYTES HARD DISK 
* STAR-LITEHD20 * 3 OPEN SLOTS 
* 20.4 MEGABYTES 
$ 4,995 * 183K FLOPPY 
* ACCOUNTING SOFTWARE 
GL-AP-AR-PR 
—THE WORLD'S FIRST S-100 PORTABLE 
COMPUTER WITH 1.5 MEGABYTES FLOPPY 
* STAR-LITE QUAD * 4 OPEN SLOTS 
* 1.54 MB FLOPPY 
$ 3,495 * ACCOUNTING 
GL-AP-AR-PR 
—THE WORLD'S FIRST S-100 PORTABLE COMPUTER 
* STAR-LITE * 4 OPEN SLOTS 
$ 2,695 * 400K FLOPPY 


FEATURES IN- 
COMMON FOR ALL 3: 


* S-100 BUS (IEEE 696) 

* CP/M 2.2 

* Z80A CPU 64K RAM 

* 9" GREEN SCREEN WITH 


REVERSE VIDEO, ETC. 


* 26 PROGRAMMABLE KEYS 
* 1 RS232 SERIAL PORT 


1 CENTRONICS PARALLEL 


* WORD PROCESSING 


SPREAD SHEET 


* 34 LBS. 
* 7 5/8” X 16 3/8" X 


16 1/2” 


* JET-AIRCRAFT-GRADE 


ALUMINUM ENCLOSURE 


COMPUTERSHOP 


139 1st ST. CAMBRIDGE, MA 02141 
(617) 661-3723, (617) 661-2670 


* DEALER INFORMATION AVAILABLE 
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New Products 
continued . 


5” hard disk systems 
A new line of 5" hard disk 
systems has been introduced by 
Tarbell Electronics. The sys- 
tems come in 5, 10, or 16 MB 
configurations. Each system in- 
cludes a 5” disk drive, an 8” 
metal frame with 5V and 12V 
regulators, a hard disk control- 
ler and cable, configured CP/ 
M 2.2, and documentation. 
Features include a data trans- 
fer rate of 5 Mbits/second and 
an average seek time of 120 
ms. 


Price: The subsystems range 
from $2,095 for 5 MB, $2,265 
for 10 MB, and $2,375 for 16 
MB. 

The Tarbell Empire Com- 
puter Series also now offers the 
5”’ hard disks, also in the 5, 10, 
or 16 MB versions. All Empire 
computers can be purchased as 
multiuser systems offering ad- 
ditional ports for 8 CRTs and 2 
printers, and up to 1MB main 
memory. 

Tarbell Electronics, 950 
Dovlen Place, Suite B, Carson, 
CA 90746; (213) 538-4251. 
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BRIDGE GRAPHICS 


PLOTPAK™ is a complete plotting 
library that runs under FORTRAN-80 
and performs a variety of functions: 


windowing, linear print arrays, automatic polygon 
drawing, annotations, plotting symboi/line selection, 
labeling, coordinate conversions. 


PLOTPAK can drive a screen and — simul- 
taneously and includes your choice of the following 


drivers: 
SCREENS 
® MicroAngelo MA 512 
° ADM + Retrographics 
© TEK 4010 Compatible Terminals 
PLOTTERS 


* Houston Instruments DMP-4 
° H.P. Plotters 7225B & 7470 
¢ Radio Shack Printer/Piotter 
PLOTPAK (.REL file) two drivers 
PLOTPAK (source code) two drivers ... .$365 


’ \NBRIDGE 


Computer Company 


: DIVISION OF SEA DATA CORPORATION 
ONE BRIDGE ST., NEWTON, MA 02158 
PHONE (617) 244-8190 


Ca. with a complete line 
of CP/M software. | 


We're no Longer the " 
best kept secret in the (Armnon 
universe. The Martians ( fARTH PRME } 1% [ow 
have landed in La Mesa, \8vY Maatian!l / / b .t. 


Let us know your 


computing problems, | 

maybe we've solved them / i 

already. | 
— 


me 
Timin FORTH RELEASE 3.1 .............. $99.95 
Supplied with a visual editor, CP/M utility pack- 
age, floating point, and 8080 / Z-80 assembler. 


Timin ROMable FORTH ........-....5+ $199.95 
Produces applicaltions in ROM. Contains all 
vocabulary of Releae 3.1 Stand alone appli- 
cations as small as 5K. 


Timin DUAL-TASKING FORTH ......... $239.95 
Simultaneous execution of two programs. Plus 
all the features of Release 3.1 


Timin FORTH Manual .......++-+..+0008 $29.95 
ATTENTION all Timin FORTH owners! We have 
a new revised manual with more examples and 
documentation. Make your programming life 
easier. 


CP/M USER’S GROUP INDEX GUIDE .... $22.95 
Abstracts and documentation from volumes 1-90 
of public domain software. 


Martian Technologies 


8348 Center Dr. Ste. F La Mesa Ca. 92041 
wan 619-464-2924 
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PARA-SOFT 


PARASOL: sn.ccase es 39.95 
° Structured but readable 
¢ 10 - 20% larger object than ASM 
© Full file interface - Record or 
Sector 
¢ Many utility libraries available 
® Binary and BCD (18-digit) 
¢ Full string-handling capability 
¢ 44K CP/M-80 or larger 
DISA ope ace ciecspeiecce cies» 39.95 
* 8080 or Z-80 disassembler 


* Output ready for ASM or MAC 
¢ Automatic label generation 


Write or call for futher information 


Available on 8” SSSD - call for 
other formats 


Parametric Software 
P.O. Box 6273 
Columbia, SC 29260 
(803) 782-5458 
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TRUE 16 BIT PROCESSIN 


oN, ‘he . i 
Sli ee 
a? 


28001 Microprocessor (upgradable to Z8003) 
® 2 Kx16 Eprom with Monitor Program 
(E*Rom optional) 

© 16 Vectored Interrupts 

© Full IEEE- 696 (S100) Compliance 

¢ All 28001 Features available 

* Battery backup time of day clock 

© Requires RAM capable of word transfers 

* CP/M8000 Coming Soon 

"Model M8000 CPU Board $425" 

“Model M8000 EE with E*Rom $500 

Memory Management Companion Card available 3rd Quarter 1983 

“6 month limited warranty 

NEW!! 
2 Serial / 2 Parallel \/O Card 

* 2 Async serial ports 

* 1 Centronics parallel! port 

© 1 General purpose parallel port 

© 3 16 bit counter/timers 

® Uses Zilog 8531/8536 

Introductory Price $225° 
To Order: Call 1-800-821-8858, In NM, 1-505-523-0975 or write: 
MICRO SOLUTIONS INC. 

Suite 191 E — 1608 El Paseo Rd. — Las Cruces, NM 88001 
Include Ck., M.O. or use Master Card or Visa. NM res. add 4.5% tax. 


CIRCLE 10 ON READER SERVICE CARD ~ 


80 CHARACTER VIDEO BOARD —S-100 
j =" aT 


All This on ONE BOARD: 

* Keyboard port with TYPE-AHEAD buffer 

* 8275 CRT controller with light pen port 

* Two 2716's — program & character rom's 

* Optional 2716 for CHARACTER GRAPHICS 

* All screen & keyboard ram 

* SIMULTANEOUS 1/O or Memory mapped 

* Z-80 MPU —2 or 4 Mhz system clock 

* Easy to adapt Software 

* Uses only EASY-TO-GET parts 

* Use in any S-100 system 

* 696 Bus Compliance: D8 M16 18 T200 

* Build for less than $200 

 INow includes Crystal and Heat Sink, $9.85 value. 
Introducing The VDB-A 

Bare board with Documentation $49.50 
+ $2.50 s&h (Ill.res. add 6% tax) 

Add 3% for MC & Visa 


Simpliwa PRODUCTS CO. 
P.O. Box 601, Hoffman Estates, IL 60195 
Dealer Inquiries Invited 


312/359-7337 
CIRCLE 67 ON READER SERVICE CARD 


Do you speak CB80O? 
¢ MAGIC Library — 21 assy language 
functions to sort arrays, process 
dates and more $39.95 

¢ CBUG Newsletter for CB80 Users 
$12/12 issues 


Do you use CBASIC? 


¢ CBASIC programs compiled to fast, 
compact .COMs 


Do you need software? 
¢ Custom CB80 programs 


Software Magic 
] 


11669 Valerio St. # 
North Hollywood, CA 91605 
(213) 765-3957 


CBASIC, CB80 are trademarks 
of Digital Research, Inc. 
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EXPLORING 
CP/M 


Explore the mazes of the CP/M 
operating system with this menu- 
driven 8-inch disk which allows 
you to (1) look into every hidden 
cranny of a CP/M disk; (2) change 
any ASCII or hex byte; (3) recover 
erased files; (4) create ‘“autoload”’ 


SIMPL-SIMON 
SOFTWARE 


disks; (5) find and lock out bad sec- 
tors; (6) reconstruct files from 
crashed disks. And more! $39.95. 


Hard-copy instructions included. For recommend- 
ed parallel reading: CP/M PRIMER by Murtha and 
Waite, $14.95. Send check for prompt shipment. Add 
$2.25 per order for shipping. Return for refund if not 
satisfied. CP/M is a registered trademark of Digital 
Research, Inc. Requires two drives, 32K. 


TELEPRINT, INC. 
P.O. Box 10B, Sylvania, Ga 30467 
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A/D B channels +D/A 8B channels 


= Fast 1.6us A/D conversion time. 100 


ns acquisition window. | ys D/A settling 
tume. 8 bits. O-5V or 0-2.5V full scales. Board 
allows re-arrangement of the pins and other 
features for easy interfacing to many types of 
host computers including Sinclair, Apple, 
TRS80, others. Switches set address. Ad- 
dress picks channel. Inquire about KITS and 
software. Assembled and tested $195 . Alu- 
minum box and mbbon cable $15. 


Computer ontiaeum 


301-16th Ave 
San Francisco, CA. 94118 (415)7526294 


RAMs AND 
EPROMs 


FOR SALE 


4164 Pla 150ns $4.60 
4164 Cer 150 4.95 
6116P-3 150 3.75 
6116LP-3 150 4.50 
2716 450 2.95 
2716-1 350 CALL 
2732 450 3.75 
2732A 250 CALL 
2764 250 7.00 
2532 450 4.25 
2564 450 8.50 


O Minimum order is $25.00 
o C.OD. only 
o OEM i on invited 


Excel-Tec Industries 
Post Office Box 2205 
Silver Spring, MD 20902 


(301)434-4123 


FREE 
CATALOG! 


Just let us know and we'll mail 
you a FREE Creative Comput 
ing Catalog—16 pages filled 
with books, buyer’s guides, 
magazines, and more! 


To get your FREE catalog, 
write to: Creative Computing 
Catalog, Dept NA1X 39 East 
Hanover Ave., Morris Plains, 
NJ 07950. 


Microsystems Mart 


THE UNIX’ ‘GUIDE 


;, An inexpensive way to discover 5, 
_, the benefits of UNIX System III = 
@ Orients computerusers to UNIXsoftware § 


@ Special coverage of the UniSoft Edition 
with Berkeley enhancements 

@ Application oriented, clearly written 
and concise 

® Helps readers determine that they are 
buying full UNIX System III 


@ Complements standard UNIX reference | 


documentation 
| Order the guide by sending a check for 

$25.00 payable to: 

PACIFIC MICRO TECH 

5819 Poinsett Ave. 
El Cerrito, CA 94530 
(415) 233-3596 

“UNIX is a trademark of Bell Laboratories 
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in your store for 


BIG PROFITS! 


FOR DETAILS: 


CALL COLLECT 
(212) 725-6851 
DIRECT RETAIL SALES DEPT. 


4th FLOOR, ONE PARK AVENUE 
NEW YORK, NY 10016 


téAutomatic 


icro 


Smartbeard™ RC1O0 - Remote Control Relay Interface 
Reliable, flexible control of up to 16 bi-stable relay switches. 


S-100 compatible 
16 channels relay control & status 
All inputs/outputs optically isolated 
Onboard 8035 CPU and 4 Status/Command registers allow 
easy control & communication with main CPU 
Relay state unaffected by power outages 
Zero voltage switching for extended relay contact life 
Port or Memory mapped addressing 
Fully Documented 
External 2716 or 2732 EPROM allow custom programming 
for application flexibility 
(Designed for GE RR8 remote control relays) 


RC100 Remote Control Relay Interface $495.00 

RRB relay (ea) $17.95 

DB-25 connector cable (ea) $24.95 
Dealer inquiries invited! 


Automatic Micro, Inc. 
P.O. Box 20007 
Columbus, Ohio 43220 


IMPROVED 
saa fe TO ATARI® 
NTERFACE! 


The omen Connection™ 


ONLY °175 


* Automatic install for many systems 

* Hardware connects Atari to CP/M 
system 

* Software allows Atari to use disk 
drives, printer and keyboard of the 
CP/M system. 

* Ability to simulate, with the CP/M 
system, 4 Atari disk drives simul- 
taneously. 

* Software buffers your keyboard 
& your printer. 

* Error detection and recovery. 

* Documentation and technical 
support. 


(408) 997-0264 
USS ENTERPRISES 


6708 Landerwood Ln., San Jose, CA 95120 
Call/Write for Free Brochure 


| WILL BEAT ANY COMPETITOR'S PRICE 
PROVIDED IT IS NOT BELOW MY COST. 
TRY TO BEAT THESE IC PRICES: 


DYNAMIC RAM 
200 ns 
150 ns 
120 ns 
200 ns 
EPROM 
300 ns 
450 ns 
450 ns 
450 ns 
STATIC RAM 
6264LP-15 150 ns 
6116P-3 150 ns 
2114 200 ns 
Z80A FAMILY 
CPU, CTC, or PIO 
DART 
DMA or SIO/O 


MasterCard/VISA or UPS CASH COD 
Factory New, Prime Parts 
MICROPROCESSORS UNLIMITED 


24,000 South Peoria Ave. 
BEGGS, OK, 74421 


(918) 267-4961 


Prices subject to change. Call for volume prices. Subiect to available quantities. 
‘Shipping & insurance extra. Cash discount prices shown. 


16 BIT S100 
SUPER MICRO 


EXPANDABILITY 
18 SLOT S-100 
128K-1M RAM 
1.2M PER 8&- DISK 
640K PER 5% DISK 
15.8M PER HARD DISK 
FLEXIBILITY 
IEEE 488 
A-TO-D AND D-TO-A 
OTHER IEEE 696 BOARDS 
GRAPHICS 
512x480 SCION or 
640x400 w/NEC 7220 
.001- 11x17—- PLOTTERS 
SOFTWARE 
MICROSOFT MSDOS 
BASIC, FORTRAN, PASCAL 
8087 SUPPORT 
PLOTTING PACKAGE 
SCREEN DUMPING 
MATRIX ROUTINES 
DATA ACQUISITION 


WILLIAM J. CLAFF 
(617) - 235-9505 


ISIS <—> CP/M® 


Full bi-directional file transfer capabilities 
are provided in the ISIS-CP/M utilities} 
package. Written in machine language| 


direct to/from an ISIS Diskette. They will 
run under any version of CP/M without re- 
gard to diskette density. The complete 
package is $250.00 including user’s man- 
ual. Write for free brochure on other CP/M 
software. 


CP/Misa repeeted trademark of Digital Research 
ISIS is a trademark of Intel Corporation 


SOUTHERN 
COMPUTER 
SYSTEMS, INC. 


P.O. Box 3373A 
Birmingham, AL 35255 
(205) 933-1659 


( ompuPro 
IT’S 
COMPUTER HOUSE 


— a 
501 “B” Street 


Ip Y) X San Rafael, Ca. 94901 
(415) 453-0865 


We specialize in CompuPro 
products at excellent prices. 


Call or write for Price List. 


Computer House is an authorized 
CompuPro Systems Center. 


LIQUIDATION 


Cash-pressed OEM is 
liquidating un-used 5.33 
megabyte hard disk 
drives for $380 EACH. 
These are Shugart SA1002 
high reliability, 8" Winchester 
technology drives sold as-is in 
the original factory sealed 
double-packed shipping con- 
tainers. Western Digital con- 
troller card for this drive $350. 
CP/M software with S-100 host 
schematic $75. Manual set for 
drive $10, shipping $12. Call 
LIQUIDATORS at 
803-877-9828 or send check 
to 105 S. Main St., Greer, SC 
29651. 


$-100 
COLOR GRAPHICS 
MUSIC SYNTHESIS 
DUAL I/O PORTS 


SINGLE BOARD DESIGN USES ONLY 22 IC'S 


COLOR GRAPHICS 
-TMS 99184 Video Display Processor -On board RF Modulator 
~256 x 192 pixel resolution -NTSC composite video connector 
-16 unique colors ~1 text and 3 graphic modes 


16K of display RAM (4116's) -32 sprites for 30 simulation 


COMPLEX SOUND GENERATION 


AY-3-8910 Prog. Sound Generator -16 level amplitude control 


-3 programmable channels Noise generator 
-Produces 3-note chords - shape/cycle controt 
-Tones from 33,5Hz to 125KHz und effects 

The AMUSIGRAF system is 6 a8 an alfordable 

package which inclu: ¢ following: 

Bare S-100 P.C. Board ~AY-3-8910 data manual 
-TMS 9918A data manual -Complete user's documentation 
-CP/M* compatible 8” disk with test and demo software 

ORDER by mail through: ORDER by phone through: 


FORESIGHT TECHNOLOGY ADCOM MKTG. SERVICES 
Write or call for more information (613) 831-1561 


AMUSIGRAF SYSTEM 
Introductory offer | Fonesiant_| 
Visa $952 Master cars FORESIGHT 
Add $3.00 for C.0.0. ECHO OSL 
Onio ree. add 5.6% sales tax | JECHNOL OSX 
Send certified check ot money order 
for immediate delivery =a a a 


Personal checks allow 2 wks. 1016 Hurtman Ct. 
"CP/M is a trademark of Digital Research Cincinnati, Ohio 45231 


COMPUTER MART 
FORMAT 
Paid xX a 


PICTURE YOUR AD HERE! 


NEXT CLOSING DATE: 
AUG 3 


VT100 PERFORMANCE FOR H/Z19 


Sa] py rrormence at fraction cost of VT 100: 

00 firmware. Totally software com- 
ber ‘with Vr100. Only limitations: normal and 
reverse video character attributes only, no pro- 
grammable tabs, no smooth scroll, and no 132 
column display. 


You get: 
land DEC VT100 Escape Sequences 
e VT52 Escape eguapricton 
 VT100 Style Setup Mode 
e VT100 Graphics Characters 
© Control Character Display Mode 
@ APL Char Set with Overstrike ($5 Option) 


HT 100 firmware extensively tested on DEC's video 
— EDT/KED) for several years. Included: 3 
R ference Manual, Installation Guide, APL 


keycap labels. 


For information or ordering: 


MicroFirm, Inc. 

Rockefeller Center Station P.O. 
P.O. Box 1276 

New York, N.Y. 10185 


Make check payable to: MicroFirm, Inc. 
$95 for HT 100, add $5 for APL Option 
New York State residents add applicable tax. 


CPM80 CROSS DEVELOPMENT SOFTWARE 


CROSS SOFTWARE DEVELOPMENT SYSTEMS FOR USE ON 
56K BYTE 280 BASED MICROCOMPUTERS RUNNING 
CPM80 2.2 OR CPM8O PLUS. EACH SDS SYSTEM 
INCLUDES A FULL FEATURED CROSS ASSEMBLER 
WHICH GENERATES EITHER RELOCATABLE OR 
ABSOLUTE OBJECT FILES, A LINK/LOCATOR 
UTILITY, A SOURCE FILE CROSS REFERENCE 
UTILITY, AND A LIBRARIAN UTILITY FOR CREATION 
AND MAINTENANCE OF EITHER SOURCE OR OBJECT 
MODULE LIBRARIES. HEX OR S-RECORD OBJECT 
FILE MAY BE CREATED USING THE LINK/ LOCATOR 
UTILITY. 


SDS SYSTEMS NOW AVAILABLE: 


sps80 INTEL 8080/8085 

SDSZ80 ZILOG 280 

SDS86 INTEL 8086/8088 w/8087 

SDS186 INTEL 80186/80188 (includes SDS86) 
SDS286 INTEL 80286 (includes SDS186) 
SDS68 MOTOROLA 68000 


TE ea Be Bt aL COMING SOON JITEIII08tttit 


ZILOG 28000 and NATIONAL SEMICONDUCTOR 
NS 16000 SUPPORT. 


SDS SYSTEM PRICES START AT $275.00 
SDS PROGRAMS ARE ALSO SOLD SEPARATELY, WITH 
PRICES STARTING AT $50.00 


ALSO AVAILABLE - DEB86, DEBZ80, DEB68 

FULL FEATURED DYNAMIC DEBUGGING TOOLS FOR THE 
8086, 280, OR 68000 MICROPROCESSORS. 

SUPPLIED IN ASSEMBLY LANGUAGE SOURCE WITH 
USER MANUALS FOR $50.00 


X86 is a 8080 TO 8086 SOURCE LANGUAGE 
TRANSLATOR PRICED AT $75.00 


FOR FACT SHEETS ON THESE AND OTHER 
DEVELOPMENT TOOLS CONTACT: 


HSC INC. 
PO BOX 86 
HERKIMER, NEW YORK 13350 
(315) 866-2311 


DEALER, DISTRIBUTOR, AND OEM DISCOUNTS AVAILABLE. 


CPM is a registered trademark of DIGITAL RESEARCH INC. 
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classified ads 


CLASSIFIED RATES: Per Word, 15 Word Minimum. 
REGULAR: $1.00. EXPAND-AD: $1.50. GENERAL 
INFORMATION: Prepayment discounts available. 
Payment must accompany order except credit card 
— Am. Ex., Diners, MC, VISA (include exp. date) — 
or accredited ad agency insertions. Copy subject to 
publisher's approval; must be typewritten or printed. 
First word set in caps. Advertisers using P.O. Boxes 
MUST supply permanent address and telephone 
number. Orders not acknowledged. They will ap- 
pear innext available issue after receipt. Send order 
& remittance to: Classified Advertising, MICRO- 
SYSTEMS Magazine, 1 Park Avenue, New York, NY 
10016. Direct inquiries to: Kenneth L. Novotny (212) 
725-3927. 


COMPUTER EQUIPMENT/SUPPLIES 


COMPUTER PAPER—Save $$$: Lowest single carton 
prices. Free samples. Bob's charts, 405 East Third, Long 
Beach, CA 90802. 


BUSINESS OPPORTUNITIES 


COMPUTER CASH—101 exciting, new, sparetime home 
businesses. Report. $4.50, Associated Research, Box 
22485MI, Houston, TX 77227. 


Rs | 
INDEXING AND MICROFORM 


AVAILABLE 


This magazine is indexed in THE MAGAZINE INDEX 
available from information Access Corporation, 
404 Sixth Avenue, Menlo Park, California, and in 
microform from Xerox University Microfilms, Ann 
Arbor, Michigan and Bell and Howell, Micro Photo 
Division, Wooster, Ohio 
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Introducing SPL 
the first multi-mode spooler 
for CP/M computers 


If you believed that your computer 
couldn't do better than a single task 
system think again. You can convert 
your machine into a dual-task computer 
with SPL, the amazing Spooler program 
developed by Blat R+D. SPL enables you ff 
to use hidden capacity available on your 
CP/M computer to print documents and 
run your ordinary programs, all at once. 

While printing, your regular 
programs won't stop 
processing, waiting for the 
printer to finish. SPL will store 
the information to be printed in 
internal or external (disk 
drives) memory until the printer is 
ready to receive the data. Result: 
your programs will run at full speed. 


As SPL can use up to the full 
capacity of your disks for temporary 
storage, it's much more powerful 
than hardware spoolers, which are 
limited to 64k memory or less. 


SPL is an advanced product with 
several modes of operation. In addition 
to intercepting the output to the printer, 
SPL can print your existing text files, or 
those that your programs will create from 
now on. SPL will even take care of tab 
expansion. As an added bonus, SPL 
needs no installation on most CP/M 2.x 
computers. 


If you have a computer 


Get A Second 
Computer 
FOR $139 


® Registered Trademark of Digital Research 


You could get an equivalent increase 
in computing power by spending $1000 
to $3000, but SPL is only $ 139, including 
disk and manual. : 


To order your SPL program call us 
today specifying what disk format you 
require. You can charge it to your VISA 
or Master Card if you prefer. 

Blat Research+Development Corp. 
8016 188th SW, Edmonds WA 98020 
Call toll-free 1-800-LOBO-BAY 

in WA call [206] 771-1408 
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197 Action Computer Enterprises, Inc. 53 
7 Adcom Systems 26 
148 Advanced Digital Corp. 9 
8 Amanuesis, Inc. 80 
2 American Planning, Corp. 127 
199 Andra-Tech 132 
13 Ashton-Tate 10 
201 Avocet Systems, Inc. 49 
1 BC Systems, Inc. 123 


BD Software 89 


150 Bay Technical Associates, Inc. 130 
151 Blatt Research & Development Corp. 136 
Bridge Computer Company 133 
6 Carousel MicroTools, Inc. 43 
76 Cer-Tek 89 
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64 Code Works, The 53 
167 Colorado Online Systems, Inc. 11 
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29 Compu-Talker 14 
84 Computer Design Labs 52 
62 Computer House 117 
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BACK ISSUES OF 


Microsystems 


‘Add to your Microsystems collection 


today, while copies are still available. The 
more complete your library of back 
issues, the more authoritative and useful 
it will be to you. ; 

You may order any issues published 
during the last twelve months, being sure 
to specify the month and year for each. If 
a particular issue is out of stock, your 
payment will be refunded promptly. 

Back issues of Microsystems are 
priced at $4.00 each, postpaid. Outside 
the U.S.A., $5.00 each. 
[MICROSYSTEMS Dept. NAGS | 
| CN 1914, Morristown, NJ 07960 


Please send volumes of Microsystems listed below: 


PAYMENT ENCLOSED $_________. (CA, NJ and NY 
STATE residents add applicable sales tax.) 


(please print full name) 
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53 SLR Systems 117 
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54 SWP, Inc. 125 
162 Sail Software 84 
47 Schrenk Electronics/Mega Co. 132 
229 Scion 73 
112 Signum Systems 132 
67 Simpliway Products Co. 133 


70 Snow Micro Systems, Inc. 80 


68 Software Magic 133 
50,51 Solution Technology, Inc. 21,23 
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267 Static Memory Systems 116 
55 Systems Group, The 41 
223 Tarbell Electronics 126 
159 Techné Software Corp. 2 
269 Telecon Systems 77 
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274 Unified Software Systems 116 
4 United Computer Corp. 37 
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59 Westerly Systems 92 
Whitesmith’s LTD. 61 
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Four Answers 10 Your 


PAUL USF POON 


Intercontinental Micro Systems makes and the prices are what youd expect from ing, hardware integration problems and 


everything you need for S-100 bus multi-user © acompany that uses the most advanced software nightmares. Come to Intercontinental 
systems, networks or single user systems. design, software and production techniques — Micro and get it all — price, performance 

Ata price that won't break your budget. to keep costs down. and delivery. 

Quite simply, our single board computers, What you won't expect is the almost Read the specs, then call, write or circle the 
Slaves, 256K memories and personality awesome sophistication of Intercontinental bingo number below. Wed be glad to send 
boards let you build a system now, not later. Micro System's products. more information and help solve your $-100, 
The hardware works, the software works, So stop messing around with multiplesourc- —_ multi-user system problems. 
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bits + 2 handshake lines per port. 0 64 Kbytes of onboard dynamic RAM. 
Master/slave memory-to-memory transfers under DMA control @ 571 
Kbyte/sec transfer rate when used with CPZ-48000 SBCP. © Software 
selectable baud rates. CO Usable as an intelligent |/0 processor in single 
user system. 


CPZ-48000 SINGLE BOARD COMPUTER. 


IEEE 696.1/D2 S-100 compliance. 0 Z80A** 4MHz Operation. 
Floppy disk controller (FDC). Single or double sided. Single 

r double density. 8" or 5'4” O Two synchronous or asynchro- 
ous serial 1/0 channels (SIO). Two parallel I/O channels 

PIO). GO Four channel DMA controller. 0 64K on board RAM. 
Memory management unit (MMU). Addresses up to 16 
megabytes of system memory. O Eight Vectored priority 
interrupts. © Provisions for 2K or 4K onboard EPROM. © Software select- 
able baud rates. C1BM Bisync, HDLC, SDLC and other protocols. OCP/M™ 


o 


=> 


MP/M;"and TurboDOS™ operating systems available. 0 Turbo-Disk® 
implementation included. 


CPX-MX SLAVES. 


IEEE 696.1/D2 S-100 compliance. 0 Compatible with ( a fea sacnensnsnaene 
CPZ-48000 SBCP any Z-80A based CPU with extended address i 
capability or 16 bit based CPUs complying with IEEE 696.1/D2 Se be Se 
bus specification. 0 Z-80B™ 6MHz (CPS-6X) or Z80A4MHz ‘hms Ns 
(CPS-4X) operation. 0 Two synchronous (CPS-MS) or 
asynchronous (CPS-MA) serial 1/0 ports. GO TurboDOS™ & 
CP/NET™ compatible. © Master confiscation of slave memory 
for diagnostic purposes. © Two parallel 1/0 ports; eight data 


206KMB-100 256K MEMORY. 


OEEE S-100 bus, spec 696.1/D2 compliance. The 256KMB-100 is 
compatible with most IEEE S-100 board products now on the 


ij ee 


market. C Linear addressable to 2 megabytes. 5 225 nano- 
second access time, maximum, 160 nano-seconds, typical. 
01295 nano- second read-write time, minimum. © Bank 
selectable 16K increments. O1/0 port address bank selection. 
OConfigures for phantom deselection. O Parity error detection, 
visual and/or interrupts. © Bank selection compatible with CROMIX” 
CP/M2.2;" MP/M;" Alpha Micro, and other major systems. 


PERSONALITY BOARDS. 


Centronics printer. C 8 inch floppy disk. 0.5% inch floppy 
isk. ORS232 serial communications. 5 Synchronous/ 
synchronous modem. © Priam smart/smart E hard disk. 
Long distance serial communication (2000 ft @ 9600 baud). 
Shugart Associates Systems Interface (SASI). C Clock/ 
calendar. O Konan David,Jr.“ hard disk. 0 Archive tape drive. 
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~~ || 1733 South Douglass Road,Ste.E 


Be oo. Pe...) AAA 


More than 100 highly placed 
military strategists, one scientist 
and one very ingenious young 
computer hobbyist used 
CompuPro systems — in 
MGM/UA’s new film, “War 
Games.” 

Two off-stage CompuPro 
systems ran a variety of on- 
screen computers, creating 
clever effects programmed by 
the film’s computer consultant, 
Steve Grumette. 


For a gigantic war-room set, 
Mr. Grumette programmed 120 
monitors to flash hundreds of 
different battle plans at eye- 
boggling speed — all using just 
two CompuPro systems. He 
credits CompuPro’s high opera- 
ting speed and optional solid 
state disk drive with making that 
scene possible. “We couldn't 
have done it with any other 
machine because at that time 
there wasn’t any other M-Drive,” 
he said. 


©1983 United Artists Corporation 


Reliability was another 
reason that Mr. Grumette chose 
CompuPro. As he put it, “When 
people are busy making a movie, 
they don’t want to wait for 
somebody to run out and get a 
printed circuit board fixed.” 


On the set and on the job, 
CompuPro delivers perfor- 
mance, quality and reliability. 


Call (415) 562-0636 for the Full Service 
CompuPro System Center nearest you 
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